home *** CD-ROM | disk | FTP | other *** search
Unknown | 1999-03-16 | 16.5 KB |
open in:
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was not able to be converted.
This format is not currently supported by dexvert.
Confidence | Program | Detection | Match Type | Support
|
---|
1%
| dexvert
| ChemDraw Template (other/chemDrawTemplate)
| ext
| Unsupported |
100%
| file
| data
| default
| |
100%
| TrID
| TERSE compressed data (PACK, U)
| default (weak)
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 02 00 00 00 02 00 ff ff | 00 00 17 00 78 78 43 6f |........|....xxCo|
|00000010| 6e 74 72 61 63 74 53 75 | 70 70 6f 72 74 53 63 72 |ntractSu|pportScr|
|00000020| 69 70 74 02 00 00 00 0f | 53 51 4c 45 73 63 61 70 |ipt.....|SQLEscap|
|00000030| 65 51 75 6f 74 65 73 ff | b7 01 2f 2f 20 54 68 69 |eQuotes.|..// Thi|
|00000040| 73 20 66 75 6e 63 74 69 | 6f 6e 20 74 61 6b 65 73 |s functi|on takes|
|00000050| 20 61 20 73 74 72 69 6e | 67 2e 20 20 49 66 20 73 | a strin|g. If s|
|00000060| 74 72 49 6e 20 69 73 20 | 0d 0a 2f 2f 20 48 65 6c |trIn is |..// Hel|
|00000070| 6c 6f 20 22 74 68 65 72 | 65 22 20 68 6f 77 27 73 |lo "ther|e" how's|
|00000080| 20 69 74 20 67 6f 69 6e | 67 3f 0d 0a 2f 2f 20 74 | it goin|g?..// t|
|00000090| 68 65 6e 20 74 68 69 73 | 20 66 75 6e 63 74 69 6f |hen this| functio|
|000000a0| 6e 20 77 69 6c 6c 20 72 | 65 74 75 72 6e 0d 0a 2f |n will r|eturn../|
|000000b0| 2f 20 48 65 6c 6c 6f 20 | 5c 22 74 68 65 72 65 5c |/ Hello |\"there\|
|000000c0| 22 20 68 6f 77 27 27 73 | 20 69 74 20 67 6f 69 6e |" how''s| it goin|
|000000d0| 67 3f 0d 0a 2f 2f 0d 0a | 66 75 6e 63 74 69 6f 6e |g?..//..|function|
|000000e0| 20 53 51 4c 45 73 63 61 | 70 65 51 75 6f 74 65 73 | SQLEsca|peQuotes|
|000000f0| 28 73 74 72 49 6e 29 0d | 0a 7b 0d 0a 20 20 20 20 |(strIn).|.{.. |
|00000100| 76 61 72 20 69 0d 0a 20 | 20 20 20 76 61 72 20 74 |var i.. | var t|
|00000110| 68 65 43 68 61 72 0d 0a | 20 20 20 20 76 61 72 20 |heChar..| var |
|00000120| 73 74 72 4f 75 74 20 3d | 20 22 22 0d 0a 0d 0a 20 |strOut =| "".... |
|00000130| 20 20 20 66 6f 72 20 28 | 69 20 3d 20 30 3b 20 69 | for (|i = 0; i|
|00000140| 20 3c 20 73 74 72 49 6e | 2e 6c 65 6e 67 74 68 3b | < strIn|.length;|
|00000150| 20 69 2b 2b 29 0d 0a 20 | 20 20 20 7b 0d 0a 20 20 | i++).. | {.. |
|00000160| 20 20 20 20 20 20 74 68 | 65 43 68 61 72 20 3d 20 | th|eChar = |
|00000170| 73 74 72 49 6e 2e 63 68 | 61 72 41 74 28 69 29 0d |strIn.ch|arAt(i).|
|00000180| 0a 20 20 20 20 20 20 20 | 20 69 66 20 28 74 68 65 |. | if (the|
|00000190| 43 68 61 72 20 3d 3d 20 | 22 27 22 29 0d 0a 20 20 |Char == |"'").. |
|000001a0| 20 20 20 20 20 20 20 20 | 20 20 73 74 72 4f 75 74 | | strOut|
|000001b0| 20 2b 3d 20 22 27 22 0d | 0a 0d 0a 20 20 20 20 20 | += "'".|... |
|000001c0| 20 20 20 73 74 72 4f 75 | 74 20 2b 3d 20 74 68 65 | strOu|t += the|
|000001d0| 43 68 61 72 0d 0a 20 20 | 20 20 7d 0d 0a 20 20 20 |Char.. | }.. |
|000001e0| 20 72 65 74 75 72 6e 20 | 73 74 72 4f 75 74 0d 0a | return |strOut..|
|000001f0| 7d 68 d7 56 38 52 90 d2 | 11 85 ef 00 60 08 ce 58 |}h.V8R..|....`..X|
|00000200| 2b 01 80 02 00 00 00 06 | 56 42 65 76 61 6c 2d 66 |+.......|VBeval-f|
|00000210| 75 6e 63 74 69 6f 6e 20 | 56 42 65 76 61 6c 28 78 |unction |VBeval(x|
|00000220| 29 20 20 7b 0d 0a 20 20 | 20 20 72 65 74 75 72 6e |) {.. | return|
|00000230| 20 65 76 61 6c 28 78 29 | 3b 0d 0a 7d eb 9a b8 73 | eval(x)|;..}...s|
|00000240| f7 8e d2 11 85 eb 00 60 | 08 ce 58 2b 08 00 ff ff |.......`|..X+....|
|00000250| 00 00 0a 00 78 78 43 6f | 6e 74 72 61 63 74 12 00 |....xxCo|ntract..|
|00000260| 00 00 2e 50 61 73 73 20 | 5b 73 6f 75 72 63 65 5d |...Pass |[source]|
|00000270| 20 74 6f 20 5b 74 61 72 | 67 65 74 5d 20 75 73 69 | to [tar|get] usi|
|00000280| 6e 67 20 5b 53 51 4c 50 | 61 72 61 6d 65 74 65 72 |ng [SQLP|arameter|
|00000290| 5d 00 00 00 00 00 02 00 | ff ff 00 00 15 00 78 78 |].......|......xx|
|000002a0| 43 6f 6e 74 72 61 63 74 | 50 61 72 74 69 63 69 70 |Contract|Particip|
|000002b0| 61 6e 74 01 00 00 00 06 | 73 6f 75 72 63 65 01 00 |ant.....|source..|
|000002c0| ff ff 00 00 15 00 78 78 | 43 6f 6e 74 72 61 63 74 |......xx|Contract|
|000002d0| 52 65 71 75 69 72 65 6d | 65 6e 74 03 00 00 00 01 |Requirem|ent.....|
|000002e0| 00 00 00 09 67 65 74 54 | 65 78 74 28 29 00 00 06 |....getT|ext()...|
|000002f0| 80 01 00 00 00 06 74 61 | 72 67 65 74 02 00 08 80 |......ta|rget....|
|00000300| 03 00 00 00 01 00 00 00 | 18 53 65 74 50 61 72 61 |........|.SetPara|
|00000310| 6d 65 74 65 72 28 6e 61 | 6d 65 2c 76 61 6c 75 65 |meter(na|me,value|
|00000320| 29 08 80 03 00 00 00 00 | 00 00 00 0c 42 65 66 6f |).......|....Befo|
|00000330| 72 65 4f 70 65 6e 28 29 | 01 00 ff ff 00 00 10 00 |reOpen()|........|
|00000340| 78 78 43 6f 6e 74 72 61 | 63 74 41 63 74 69 6f 6e |xxContra|ctAction|
|00000350| 04 00 00 00 0c 42 65 66 | 6f 72 65 4f 70 65 6e 28 |.....Bef|oreOpen(|
|00000360| 29 02 00 00 00 00 00 00 | 00 ff 6d 01 76 61 72 20 |).......|..m.var |
|00000370| 50 61 72 61 6d 56 61 6c | 75 65 20 3d 20 53 74 72 |ParamVal|ue = Str|
|00000380| 69 6e 67 28 52 65 71 75 | 65 73 74 28 22 5b 73 6f |ing(Requ|est("[so|
|00000390| 75 72 63 65 5d 22 29 29 | 3b 0d 0a 76 61 72 20 45 |urce]"))|;..var E|
|000003a0| 6e 63 6c 6f 73 69 6e 67 | 54 6f 6b 65 6e 20 3d 20 |nclosing|Token = |
|000003b0| 5b 45 6e 63 6c 6f 73 69 | 6e 67 20 54 6f 6b 65 6e |[Enclosi|ng Token|
|000003c0| 5d 0d 0a 0d 0a 69 66 20 | 28 45 6e 63 6c 6f 73 69 |]....if |(Enclosi|
|000003d0| 6e 67 54 6f 6b 65 6e 20 | 3d 3d 22 4e 6f 6e 65 22 |ngToken |=="None"|
|000003e0| 29 0d 0a 20 20 45 6e 63 | 6c 6f 73 69 6e 67 54 6f |).. Enc|losingTo|
|000003f0| 6b 65 6e 20 3d 20 22 22 | 0d 0a 0d 0a 0d 0a 69 66 |ken = ""|......if|
|00000400| 20 28 28 50 61 72 61 6d | 56 61 6c 75 65 20 21 3d | ((Param|Value !=|
|00000410| 20 22 22 29 20 26 26 20 | 28 50 61 72 61 6d 56 61 | "") && |(ParamVa|
|00000420| 6c 75 65 20 21 3d 20 22 | 75 6e 64 65 66 69 6e 65 |lue != "|undefine|
|00000430| 64 22 29 29 0d 0a 7b 0d | 0a 20 50 61 72 61 6d 56 |d"))..{.|. ParamV|
|00000440| 61 6c 75 65 20 3d 20 53 | 51 4c 45 73 63 61 70 65 |alue = S|QLEscape|
|00000450| 51 75 6f 74 65 73 28 50 | 61 72 61 6d 56 61 6c 75 |Quotes(P|aramValu|
|00000460| 65 29 09 0d 0a 20 50 61 | 72 61 6d 56 61 6c 75 65 |e)... Pa|ramValue|
|00000470| 20 3d 20 45 6e 63 6c 6f | 73 69 6e 67 54 6f 6b 65 | = Enclo|singToke|
|00000480| 6e 20 2b 20 50 61 72 61 | 6d 56 61 6c 75 65 20 2b |n + Para|mValue +|
|00000490| 20 45 6e 63 6c 6f 73 69 | 6e 67 54 6f 6b 65 6e 3b | Enclosi|ngToken;|
|000004a0| 0d 0a 09 5b 74 61 72 67 | 65 74 5d 2e 53 65 74 50 |...[targ|et].SetP|
|000004b0| 61 72 61 6d 65 74 65 72 | 28 5b 53 51 4c 20 50 61 |arameter|([SQL Pa|
|000004c0| 72 61 6d 65 74 65 72 5d | 2c 20 50 61 72 61 6d 56 |rameter]|, ParamV|
|000004d0| 61 6c 75 65 29 3b 0d 0a | 7d 01 00 00 00 ff 73 01 |alue);..|}.....s.|
|000004e0| 50 61 72 61 6d 56 61 6c | 75 65 20 3d 20 43 53 74 |ParamVal|ue = CSt|
|000004f0| 72 28 52 65 71 75 65 73 | 74 28 22 5b 73 6f 75 72 |r(Reques|t("[sour|
|00000500| 63 65 5d 22 29 29 0d 0a | 45 6e 63 6c 6f 73 69 6e |ce]"))..|Enclosin|
|00000510| 67 54 6f 6b 65 6e 20 3d | 20 5b 45 6e 63 6c 6f 73 |gToken =| [Enclos|
|00000520| 69 6e 67 20 54 6f 6b 65 | 6e 5d 0d 0a 69 66 20 45 |ing Toke|n]..if E|
|00000530| 6e 63 6c 6f 73 69 6e 67 | 54 6f 6b 65 6e 20 3d 20 |nclosing|Token = |
|00000540| 22 4e 6f 6e 65 22 20 74 | 68 65 6e 0d 0a 20 20 45 |"None" t|hen.. E|
|00000550| 6e 63 6c 6f 73 69 6e 67 | 54 6f 6b 65 6e 20 3d 20 |nclosing|Token = |
|00000560| 22 22 0d 0a 65 6e 64 20 | 69 66 0d 0a 0d 0a 69 66 |""..end |if....if|
|00000570| 20 28 28 50 61 72 61 6d | 56 61 6c 75 65 20 3c 3e | ((Param|Value <>|
|00000580| 20 22 22 29 20 41 4e 44 | 20 28 50 61 72 61 6d 56 | "") AND| (ParamV|
|00000590| 61 6c 75 65 20 3c 3e 20 | 22 75 6e 64 65 66 69 6e |alue <> |"undefin|
|000005a0| 65 64 22 29 29 20 74 68 | 65 6e 0d 0a 20 50 61 72 |ed")) th|en.. Par|
|000005b0| 61 6d 56 61 6c 75 65 20 | 3d 20 53 51 4c 45 73 63 |amValue |= SQLEsc|
|000005c0| 61 70 65 51 75 6f 74 65 | 73 28 50 61 72 61 6d 56 |apeQuote|s(ParamV|
|000005d0| 61 6c 75 65 29 0d 0a 09 | 50 61 72 61 6d 56 61 6c |alue)...|ParamVal|
|000005e0| 75 65 20 3d 20 45 6e 63 | 6c 6f 73 69 6e 67 54 6f |ue = Enc|losingTo|
|000005f0| 6b 65 6e 20 26 20 50 61 | 72 61 6d 56 61 6c 75 65 |ken & Pa|ramValue|
|00000600| 20 26 20 45 6e 63 6c 6f | 73 69 6e 67 54 6f 6b 65 | & Enclo|singToke|
|00000610| 6e 0d 0a 09 43 61 6c 6c | 20 5b 74 61 72 67 65 74 |n...Call| [target|
|00000620| 5d 2e 53 65 74 50 61 72 | 61 6d 65 74 65 72 28 5b |].SetPar|ameter([|
|00000630| 53 51 4c 20 50 61 72 61 | 6d 65 74 65 72 5d 2c 20 |SQL Para|meter], |
|00000640| 50 61 72 61 6d 56 61 6c | 75 65 29 0d 0a 65 6e 64 |ParamVal|ue)..end|
|00000650| 20 69 66 02 00 ff ff 00 | 00 0d 00 78 78 53 63 72 | if.....|...xxScr|
|00000660| 69 70 74 50 61 72 61 6d | 05 00 00 00 0d 53 51 4c |iptParam|.....SQL|
|00000670| 20 50 61 72 61 6d 65 74 | 65 72 04 00 00 00 08 00 | Paramet|er......|
|00000680| 00 00 00 00 00 00 00 00 | 00 00 06 74 61 72 67 65 |........|...targe|
|00000690| 74 01 00 00 00 0f 80 05 | 00 00 00 0f 45 6e 63 6c |t.......|....Encl|
|000006a0| 6f 73 69 6e 67 20 54 6f | 6b 65 6e 04 00 00 00 08 |osing To|ken.....|
|000006b0| 00 02 00 00 00 27 00 03 | 00 01 27 01 23 04 4e 6f |.....'..|..'.#.No|
|000006c0| 6e 65 00 00 00 00 00 00 | 00 00 00 0e 53 51 4c 20 |ne......|....SQL |
|000006d0| 50 61 72 61 6d 65 74 65 | 72 73 01 00 68 d7 56 38 |Paramete|rs..h.V8|
|000006e0| 52 90 d2 11 85 ef 00 60 | 08 ce 58 2b 00 00 00 00 |R......`|..X+....|
|000006f0| 04 00 00 00 01 00 00 00 | 00 00 d1 8f 13 d1 2e 57 |........|.......W|
|00000700| d2 11 90 e1 00 60 08 8f | 47 c4 01 00 00 00 24 33 |.....`..|G.....$3|
|00000710| 37 37 41 43 34 33 30 2d | 36 32 31 31 2d 31 31 44 |77AC430-|6211-11D|
|00000720| 32 2d 38 31 31 37 2d 30 | 30 36 30 30 38 43 38 36 |2-8117-0|06008C86|
|00000730| 43 32 35 03 33 2e 30 ff | e9 03 44 65 73 63 72 69 |C25.3.0.|..Descri|
|00000740| 70 74 69 6f 6e 3a 0d 0a | 54 68 69 73 20 63 6f 6e |ption:..|This con|
|00000750| 74 72 61 63 74 20 73 65 | 74 73 20 74 68 65 20 76 |tract se|ts the v|
|00000760| 61 6c 75 65 20 6f 66 20 | 61 20 70 61 72 61 6d 65 |alue of |a parame|
|00000770| 74 65 72 20 69 6e 20 79 | 6f 75 72 20 53 51 4c 20 |ter in y|our SQL |
|00000780| 73 74 61 74 65 6d 65 6e | 74 20 74 6f 20 74 68 65 |statemen|t to the|
|00000790| 20 63 6f 6e 74 65 6e 74 | 73 20 6f 66 20 61 6e 20 | content|s of an |
|000007a0| 65 64 69 74 20 62 6f 78 | 2e 20 20 57 68 65 6e 20 |edit box|. When |
|000007b0| 79 6f 75 20 61 70 70 6c | 79 20 74 68 65 20 69 6e |you appl|y the in|
|000007c0| 74 65 72 61 63 74 69 6f | 6e 2c 20 79 6f 75 20 63 |teractio|n, you c|
|000007d0| 61 6e 20 73 65 6c 65 63 | 74 20 74 68 65 20 53 51 |an selec|t the SQ|
|000007e0| 4c 20 70 61 72 61 6d 65 | 74 65 72 20 74 6f 20 62 |L parame|ter to b|
|000007f0| 65 20 73 65 74 20 69 6e | 20 74 68 65 20 75 6e 64 |e set in| the und|
|00000800| 65 72 6c 79 69 6e 67 20 | 71 75 65 72 79 20 61 73 |erlying |query as|
|00000810| 20 77 65 6c 6c 20 61 73 | 20 74 68 65 20 65 6e 63 | well as| the enc|
|00000820| 6c 6f 73 69 6e 67 20 74 | 6f 6b 65 6e 73 20 62 61 |losing t|okens ba|
|00000830| 73 65 64 20 6f 6e 20 74 | 68 65 20 64 61 74 61 20 |sed on t|he data |
|00000840| 74 79 70 65 20 72 65 71 | 75 69 72 65 6d 65 6e 74 |type req|uirement|
|00000850| 73 20 6f 66 20 79 6f 75 | 72 20 64 61 74 61 62 61 |s of you|r databa|
|00000860| 73 65 2e 0d 0a 0d 0a 59 | 6f 75 20 73 68 6f 75 6c |se.....Y|ou shoul|
|00000870| 64 20 6f 6e 6c 79 20 75 | 73 65 20 74 68 69 73 20 |d only u|se this |
|00000880| 63 6f 6e 74 72 61 63 74 | 20 77 68 65 6e 20 79 6f |contract| when yo|
|00000890| 75 20 61 72 65 20 77 6f | 72 6b 69 6e 67 20 77 69 |u are wo|rking wi|
|000008a0| 74 68 20 61 20 70 61 72 | 61 6d 65 74 65 72 69 7a |th a par|ameteriz|
|000008b0| 65 64 20 53 51 4c 20 53 | 74 61 74 65 6d 65 6e 74 |ed SQL S|tatement|
|000008c0| 2e 20 20 49 66 20 79 6f | 75 20 74 72 79 20 74 6f |. If yo|u try to|
|000008d0| 20 75 73 65 20 69 74 20 | 6f 6e 20 61 20 52 65 63 | use it |on a Rec|
|000008e0| 6f 72 64 73 65 74 20 77 | 69 74 68 6f 75 74 20 70 |ordset w|ithout p|
|000008f0| 61 72 61 6d 65 74 65 72 | 73 2c 20 74 68 65 20 53 |arameter|s, the S|
|00000900| 51 4c 20 50 61 72 61 6d | 65 74 65 72 20 64 72 6f |QL Param|eter dro|
|00000910| 70 20 64 6f 77 6e 20 77 | 69 6c 6c 20 62 65 20 65 |p down w|ill be e|
|00000920| 6d 70 74 79 2e 0d 0a 0d | 0a 50 61 72 61 6d 65 74 |mpty....|.Paramet|
|00000930| 65 72 73 3a 0d 0a 5b 53 | 51 4c 20 50 61 72 61 6d |ers:..[S|QL Param|
|00000940| 65 74 65 72 73 5d 20 2d | 20 70 61 72 61 6d 65 74 |eters] -| paramet|
|00000950| 65 72 20 79 6f 75 20 77 | 6f 75 6c 64 20 6c 69 6b |er you w|ould lik|
|00000960| 65 20 74 6f 20 63 68 61 | 6e 67 65 20 0d 0a 5b 45 |e to cha|nge ..[E|
|00000970| 6e 63 6c 6f 73 69 6e 67 | 20 54 6f 6b 65 6e 5d 20 |nclosing| Token] |
|00000980| 2d 20 53 65 74 73 20 74 | 68 65 20 64 65 6c 69 6d |- Sets t|he delim|
|00000990| 69 74 65 72 20 74 6f 6b | 65 6e 20 66 6f 72 20 74 |iter tok|en for t|
|000009a0| 68 65 20 70 61 72 61 6d | 65 74 65 72 27 73 20 76 |he param|eter's v|
|000009b0| 61 6c 75 65 2e 20 20 59 | 6f 75 20 73 68 6f 75 6c |alue. Y|ou shoul|
|000009c0| 64 20 6b 6e 6f 77 20 74 | 68 65 20 64 65 6c 69 6d |d know t|he delim|
|000009d0| 69 74 65 72 20 72 65 71 | 75 69 72 65 6d 65 6e 74 |iter req|uirement|
|000009e0| 73 20 69 6e 20 79 6f 75 | 72 20 64 61 74 61 62 61 |s in you|r databa|
|000009f0| 73 65 20 66 6f 72 20 74 | 68 65 20 65 78 70 65 63 |se for t|he expec|
|00000a00| 74 65 64 20 64 61 74 61 | 20 74 79 70 65 20 6f 66 |ted data| type of|
|00000a10| 20 74 68 65 20 70 61 72 | 61 6d 65 74 65 72 2e 0d | the par|ameter..|
|00000a20| 0a 0d 0a 54 79 70 69 63 | 61 6c 20 50 61 72 74 69 |...Typic|al Parti|
|00000a30| 63 69 70 61 6e 74 73 3a | 0d 0a 5b 53 6f 75 72 63 |cipants:|..[Sourc|
|00000a40| 65 5d 20 2d 20 65 64 69 | 74 20 62 6f 78 0d 0a 5b |e] - edi|t box..[|
|00000a50| 54 61 72 67 65 74 5d 20 | 2d 20 72 65 63 6f 72 64 |Target] |- record|
|00000a60| 73 65 74 20 6f 72 20 63 | 6f 6d 6d 61 6e 64 20 6f |set or c|ommand o|
|00000a70| 62 6a 65 63 74 0d 0a 0d | 0a 46 6f 72 20 6d 6f 72 |bject...|.For mor|
|00000a80| 65 20 69 6e 66 6f 72 6d | 61 74 69 6f 6e 20 6f 6e |e inform|ation on|
|00000a90| 20 63 6f 6e 74 72 61 63 | 74 73 20 6f 66 20 74 68 | contrac|ts of th|
|00000aa0| 69 73 20 63 61 74 65 67 | 6f 72 79 2c 20 70 6c 65 |is categ|ory, ple|
|00000ab0| 61 73 65 20 72 65 66 65 | 72 20 74 6f 0d 0a 53 51 |ase refe|r to..SQ|
|00000ac0| 4c 50 61 72 61 6d 65 74 | 65 72 73 2e 64 6f 63 0d |LParamet|ers.doc.|
|00000ad0| 0a 54 68 69 73 20 66 69 | 6c 65 20 69 73 20 61 76 |.This fi|le is av|
|00000ae0| 61 69 6c 61 62 6c 65 20 | 69 6e 20 74 68 65 20 43 |ailable |in the C|
|00000af0| 6f 6e 74 72 61 63 74 73 | 20 66 6f 6c 64 65 72 20 |ontracts| folder |
|00000b00| 69 6e 20 74 68 65 20 44 | 72 75 6d 62 65 61 74 20 |in the D|rumbeat |
|00000b10| 64 69 72 65 63 74 6f 72 | 79 2e 0d 0a 56 31 30 5f |director|y...V10_|
|00000b20| 33 30 2e 04 80 12 00 00 | 00 00 01 00 00 00 38 50 |30......|......8P|
|00000b30| 61 73 73 20 5b 53 65 72 | 76 65 72 45 78 70 72 65 |ass [Ser|verExpre|
|00000b40| 73 73 69 6f 6e 5d 20 74 | 6f 20 5b 74 61 72 67 65 |ssion] t|o [targe|
|00000b50| 74 5d 20 75 73 69 6e 67 | 20 5b 53 51 4c 50 61 72 |t] using| [SQLPar|
|00000b60| 61 6d 65 74 65 72 5d 01 | 00 06 80 01 00 00 00 06 |ameter].|........|
|00000b70| 74 61 72 67 65 74 02 00 | 08 80 03 00 00 00 01 00 |target..|........|
|00000b80| 00 00 18 53 65 74 50 61 | 72 61 6d 65 74 65 72 28 |...SetPa|rameter(|
|00000b90| 6e 61 6d 65 2c 76 61 6c | 75 65 29 08 80 03 00 00 |name,val|ue).....|
|00000ba0| 00 00 00 00 00 0c 42 65 | 66 6f 72 65 4f 70 65 6e |......Be|foreOpen|
|00000bb0| 28 29 01 00 0d 80 04 00 | 00 00 0c 42 65 66 6f 72 |()......|...Befor|
|00000bc0| 65 4f 70 65 6e 28 29 02 | 00 00 00 00 00 00 00 ff |eOpen().|........|
|00000bd0| 37 01 76 61 72 20 50 61 | 72 61 6d 56 61 6c 75 65 |7.var Pa|ramValue|
|00000be0| 20 3d 20 65 76 61 6c 28 | 5b 65 78 70 72 65 73 73 | = eval(|[express|
|00000bf0| 69 6f 6e 5d 29 3b 0d 0a | 76 61 72 20 45 6e 63 6c |ion]);..|var Encl|
|00000c00| 6f 73 69 6e 67 54 6f 6b | 65 6e 20 3d 20 5b 45 6e |osingTok|en = [En|
|00000c10| 63 6c 6f 73 69 6e 67 20 | 54 6f 6b 65 6e 5d 0d 0a |closing |Token]..|
|00000c20| 0d 0a 69 66 20 28 45 6e | 63 6c 6f 73 69 6e 67 54 |..if (En|closingT|
|00000c30| 6f 6b 65 6e 20 3d 3d 22 | 4e 6f 6e 65 22 29 0d 0a |oken =="|None")..|
|00000c40| 20 20 45 6e 63 6c 6f 73 | 69 6e 67 54 6f 6b 65 6e | Enclos|ingToken|
|00000c50| 20 3d 20 22 22 0d 0a 0d | 0a 69 66 20 28 28 50 61 | = ""...|.if ((Pa|
|00000c60| 72 61 6d 56 61 6c 75 65 | 20 21 3d 20 22 22 29 20 |ramValue| != "") |
|00000c70| 26 26 20 28 50 61 72 61 | 6d 56 61 6c 75 65 20 21 |&& (Para|mValue !|
|00000c80| 3d 20 22 75 6e 64 65 66 | 69 6e 65 64 22 29 29 20 |= "undef|ined")) |
|00000c90| 0d 0a 7b 0d 0a 09 50 61 | 72 61 6d 56 61 6c 75 65 |..{...Pa|ramValue|
|00000ca0| 20 3d 20 45 6e 63 6c 6f | 73 69 6e 67 54 6f 6b 65 | = Enclo|singToke|
|00000cb0| 6e 20 2b 20 50 61 72 61 | 6d 56 61 6c 75 65 20 2b |n + Para|mValue +|
|00000cc0| 20 45 6e 63 6c 6f 73 69 | 6e 67 54 6f 6b 65 6e 3b | Enclosi|ngToken;|
|00000cd0| 0d 0a 09 5b 74 61 72 67 | 65 74 5d 2e 53 65 74 50 |...[targ|et].SetP|
|00000ce0| 61 72 61 6d 65 74 65 72 | 28 5b 53 51 4c 20 50 61 |arameter|([SQL Pa|
|00000cf0| 72 61 6d 65 74 65 72 5d | 2c 20 50 61 72 61 6d 56 |rameter]|, ParamV|
|00000d00| 61 6c 75 65 29 3b 0d 0a | 7d 01 00 00 00 ff 3f 01 |alue);..|}.....?.|
|00000d10| 50 61 72 61 6d 56 61 6c | 75 65 20 3d 20 56 42 65 |ParamVal|ue = VBe|
|00000d20| 76 61 6c 28 5b 65 78 70 | 72 65 73 73 69 6f 6e 5d |val([exp|ression]|
|00000d30| 29 0d 0a 45 6e 63 6c 6f | 73 69 6e 67 54 6f 6b 65 |)..Enclo|singToke|
|00000d40| 6e 20 3d 20 5b 45 6e 63 | 6c 6f 73 69 6e 67 20 54 |n = [Enc|losing T|
|00000d50| 6f 6b 65 6e 5d 0d 0a 69 | 66 20 45 6e 63 6c 6f 73 |oken]..i|f Enclos|
|00000d60| 69 6e 67 54 6f 6b 65 6e | 20 3d 20 22 4e 6f 6e 65 |ingToken| = "None|
|00000d70| 22 20 74 68 65 6e 0d 0a | 20 20 45 6e 63 6c 6f 73 |" then..| Enclos|
|00000d80| 69 6e 67 54 6f 6b 65 6e | 20 3d 20 22 22 0d 0a 65 |ingToken| = ""..e|
|00000d90| 6e 64 20 69 66 0d 0a 0d | 0a 0d 0a 69 66 20 28 28 |nd if...|...if ((|
|00000da0| 50 61 72 61 6d 56 61 6c | 75 65 20 3c 3e 20 22 22 |ParamVal|ue <> ""|
|00000db0| 29 20 41 4e 44 20 28 50 | 61 72 61 6d 56 61 6c 75 |) AND (P|aramValu|
|00000dc0| 65 20 3c 3e 20 22 75 6e | 64 65 66 69 6e 65 64 22 |e <> "un|defined"|
|00000dd0| 29 29 20 74 68 65 6e 0d | 0a 09 50 61 72 61 6d 56 |)) then.|..ParamV|
|00000de0| 61 6c 75 65 20 3d 20 45 | 6e 63 6c 6f 73 69 6e 67 |alue = E|nclosing|
|00000df0| 54 6f 6b 65 6e 20 26 20 | 50 61 72 61 6d 56 61 6c |Token & |ParamVal|
|00000e00| 75 65 20 26 20 45 6e 63 | 6c 6f 73 69 6e 67 54 6f |ue & Enc|losingTo|
|00000e10| 6b 65 6e 0d 0a 09 5b 74 | 61 72 67 65 74 5d 2e 53 |ken...[t|arget].S|
|00000e20| 65 74 50 61 72 61 6d 65 | 74 65 72 20 5b 53 51 4c |etParame|ter [SQL|
|00000e30| 20 50 61 72 61 6d 65 74 | 65 72 5d 2c 20 50 61 72 | Paramet|er], Par|
|00000e40| 61 6d 56 61 6c 75 65 0d | 0a 65 6e 64 20 69 66 03 |amValue.|.end if.|
|00000e50| 00 0f 80 05 00 00 00 0d | 53 51 4c 20 50 61 72 61 |........|SQL Para|
|00000e60| 6d 65 74 65 72 04 00 00 | 00 08 00 00 00 00 00 00 |meter...|........|
|00000e70| 00 00 00 00 00 06 74 61 | 72 67 65 74 01 00 00 00 |......ta|rget....|
|00000e80| 0f 80 05 00 00 00 0a 65 | 78 70 72 65 73 73 69 6f |.......e|xpressio|
|00000e90| 6e 00 00 00 00 08 00 00 | 00 00 00 00 00 00 00 00 |n.......|........|
|00000ea0| 00 00 00 00 00 00 0f 80 | 05 00 00 00 0f 45 6e 63 |........|.....Enc|
|00000eb0| 6c 6f 73 69 6e 67 20 54 | 6f 6b 65 6e 04 00 00 00 |losing T|oken....|
|00000ec0| 08 00 02 00 00 00 27 00 | 03 00 01 27 01 23 04 4e |......'.|...'.#.N|
|00000ed0| 6f 6e 65 00 00 00 00 00 | 00 00 00 00 0e 53 51 4c |one.....|.....SQL|
|00000ee0| 20 50 61 72 61 6d 65 74 | 65 72 73 01 00 eb 9a b8 | Paramet|ers.....|
|00000ef0| 73 f7 8e d2 11 85 eb 00 | 60 08 ce 58 2b 00 00 00 |s.......|`..X+...|
|00000f00| 00 04 00 00 00 01 00 00 | 00 00 00 84 44 16 0b 36 |........|....D..6|
|00000f10| 57 d2 11 90 e1 00 60 08 | 8f 47 c4 01 00 00 00 24 |W.....`.|.G.....$|
|00000f20| 33 37 37 41 43 34 33 30 | 2d 36 32 31 31 2d 31 31 |377AC430|-6211-11|
|00000f30| 44 32 2d 38 31 31 37 2d | 30 30 36 30 30 38 43 38 |D2-8117-|006008C8|
|00000f40| 36 43 32 35 03 33 2e 30 | ff b6 02 44 65 73 63 72 |6C25.3.0|...Descr|
|00000f50| 69 70 74 69 6f 6e 3a 0d | 0a 54 68 69 73 20 63 6f |iption:.|.This co|
|00000f60| 6e 74 72 61 63 74 20 73 | 65 74 73 20 74 68 65 20 |ntract s|ets the |
|00000f70| 76 61 6c 75 65 20 6f 66 | 20 61 20 70 61 72 61 6d |value of| a param|
|00000f80| 65 74 65 72 20 69 6e 20 | 61 20 70 61 72 61 6d 65 |eter in |a parame|
|00000f90| 74 65 72 69 7a 65 64 20 | 53 51 4c 20 73 74 61 74 |terized |SQL stat|
|00000fa0| 65 6d 65 6e 74 20 74 6f | 20 61 20 76 61 72 69 61 |ement to| a varia|
|00000fb0| 62 6c 65 20 61 76 61 69 | 6c 61 62 6c 65 20 6f 6e |ble avai|lable on|
|00000fc0| 20 74 68 65 20 73 65 72 | 76 65 72 2e 0d 0a 0d 0a | the ser|ver.....|
|00000fd0| 50 61 72 61 6d 65 74 65 | 72 73 3a 0d 0a 5b 65 78 |Paramete|rs:..[ex|
|00000fe0| 70 72 65 73 73 69 6f 6e | 5d 20 2d 20 6a 75 73 74 |pression|] - just|
|00000ff0| 20 6c 69 6b 65 20 69 6e | 20 74 68 65 20 61 74 74 | like in| the att|
|00001000| 72 69 62 75 74 65 73 20 | 74 68 69 73 20 63 61 6e |ributes |this can|
|00001010| 20 62 65 20 61 6e 79 20 | 73 65 72 76 65 72 20 76 | be any |server v|
|00001020| 61 72 69 61 62 6c 65 0d | 0a 5b 53 51 4c 20 50 61 |ariable.|.[SQL Pa|
|00001030| 72 61 6d 65 74 65 72 73 | 5d 20 2d 20 70 61 72 61 |rameters|] - para|
|00001040| 6d 65 74 65 72 20 79 6f | 75 20 77 6f 75 6c 64 20 |meter yo|u would |
|00001050| 6c 69 6b 65 20 74 6f 20 | 63 68 61 6e 67 65 20 0d |like to |change .|
|00001060| 0a 5b 45 6e 63 6c 6f 73 | 69 6e 67 20 54 6f 6b 65 |.[Enclos|ing Toke|
|00001070| 6e 5d 20 2d 20 53 65 74 | 73 20 74 68 65 20 64 65 |n] - Set|s the de|
|00001080| 6c 69 6d 69 74 65 72 20 | 74 6f 6b 65 6e 20 66 6f |limiter |token fo|
|00001090| 72 20 74 68 65 20 70 61 | 72 61 6d 65 74 65 72 27 |r the pa|rameter'|
|000010a0| 73 20 76 61 6c 75 65 2e | 20 20 59 6f 75 20 73 68 |s value.| You sh|
|000010b0| 6f 75 6c 64 20 6b 6e 6f | 77 20 74 68 65 20 64 65 |ould kno|w the de|
|000010c0| 6c 69 6d 69 74 65 72 20 | 72 65 71 75 69 72 65 6d |limiter |requirem|
|000010d0| 65 6e 74 73 20 69 6e 20 | 79 6f 75 72 20 64 61 74 |ents in |your dat|
|000010e0| 61 62 61 73 65 20 66 6f | 72 20 74 68 65 20 65 78 |abase fo|r the ex|
|000010f0| 70 65 63 74 65 64 20 64 | 61 74 61 20 74 79 70 65 |pected d|ata type|
|00001100| 20 6f 66 20 74 68 65 20 | 70 61 72 61 6d 65 74 65 | of the |paramete|
|00001110| 72 2e 0d 0a 0d 0a 54 79 | 70 69 63 61 6c 20 50 61 |r.....Ty|pical Pa|
|00001120| 72 74 69 63 69 70 61 6e | 74 73 3a 0d 0a 5b 54 61 |rticipan|ts:..[Ta|
|00001130| 72 67 65 74 5d 20 2d 20 | 72 65 63 6f 72 64 73 65 |rget] - |recordse|
|00001140| 74 20 6f 72 20 63 6f 6d | 6d 61 6e 64 20 6f 62 6a |t or com|mand obj|
|00001150| 65 63 74 0d 0a 0d 0a 46 | 6f 72 20 6d 6f 72 65 20 |ect....F|or more |
|00001160| 69 6e 66 6f 72 6d 61 74 | 69 6f 6e 20 6f 6e 20 63 |informat|ion on c|
|00001170| 6f 6e 74 72 61 63 74 73 | 20 6f 66 20 74 68 69 73 |ontracts| of this|
|00001180| 20 63 61 74 65 67 6f 72 | 79 2c 20 70 6c 65 61 73 | categor|y, pleas|
|00001190| 65 20 72 65 66 65 72 20 | 74 6f 0d 0a 53 51 4c 50 |e refer |to..SQLP|
|000011a0| 61 72 61 6d 65 74 65 72 | 73 2e 64 6f 63 0d 0a 54 |arameter|s.doc..T|
|000011b0| 68 69 73 20 66 69 6c 65 | 20 69 73 20 61 76 61 69 |his file| is avai|
|000011c0| 6c 61 62 6c 65 20 69 6e | 20 74 68 65 20 43 6f 6e |lable in| the Con|
|000011d0| 74 72 61 63 74 73 20 66 | 6f 6c 64 65 72 20 69 6e |tracts f|older in|
|000011e0| 20 74 68 65 20 44 72 75 | 6d 62 65 61 74 20 64 69 | the Dru|mbeat di|
|000011f0| 72 65 63 74 6f 72 79 2e | 0d 0a 56 31 30 5f 33 30 |rectory.|..V10_30|
|00001200| 2e 04 80 12 00 00 00 30 | 50 61 73 73 20 5b 4c 69 |.......0|Pass [Li|
|00001210| 73 74 49 74 65 6d 5d 20 | 74 6f 20 5b 74 61 72 67 |stItem] |to [targ|
|00001220| 65 74 5d 20 75 73 69 6e | 67 20 5b 53 51 4c 50 61 |et] usin|g [SQLPa|
|00001230| 72 61 6d 65 74 65 72 5d | 00 00 00 00 00 02 00 06 |rameter]|........|
|00001240| 80 01 00 00 00 06 74 61 | 72 67 65 74 02 00 08 80 |......ta|rget....|
|00001250| 03 00 00 00 01 00 00 00 | 18 53 65 74 50 61 72 61 |........|.SetPara|
|00001260| 6d 65 74 65 72 28 6e 61 | 6d 65 2c 76 61 6c 75 65 |meter(na|me,value|
|00001270| 29 08 80 03 00 00 00 00 | 00 00 00 0c 42 65 66 6f |).......|....Befo|
|00001280| 72 65 4f 70 65 6e 28 29 | 01 00 0d 80 04 00 00 00 |reOpen()|........|
|00001290| 0c 42 65 66 6f 72 65 4f | 70 65 6e 28 29 02 00 00 |.BeforeO|pen()...|
|000012a0| 00 00 00 00 00 ff 6c 01 | 76 61 72 20 50 61 72 61 |......l.|var Para|
|000012b0| 6d 56 61 6c 75 65 20 3d | 20 53 74 72 69 6e 67 28 |mValue =| String(|
|000012c0| 52 65 71 75 65 73 74 28 | 22 5b 4c 69 73 74 49 74 |Request(|"[ListIt|
|000012d0| 65 6d 5d 22 29 29 3b 0d | 0a 76 61 72 20 45 6e 63 |em]"));.|.var Enc|
|000012e0| 6c 6f 73 69 6e 67 54 6f | 6b 65 6e 20 3d 20 5b 45 |losingTo|ken = [E|
|000012f0| 6e 63 6c 6f 73 69 6e 67 | 20 54 6f 6b 65 6e 5d 0d |nclosing| Token].|
|00001300| 0a 0d 0a 69 66 20 28 45 | 6e 63 6c 6f 73 69 6e 67 |...if (E|nclosing|
|00001310| 54 6f 6b 65 6e 20 3d 3d | 22 4e 6f 6e 65 22 29 0d |Token ==|"None").|
|00001320| 0a 20 20 45 6e 63 6c 6f | 73 69 6e 67 54 6f 6b 65 |. Enclo|singToke|
|00001330| 6e 20 3d 20 22 22 0d 0a | 0d 0a 69 66 20 28 28 50 |n = ""..|..if ((P|
|00001340| 61 72 61 6d 56 61 6c 75 | 65 20 21 3d 20 22 22 29 |aramValu|e != "")|
|00001350| 20 26 26 20 28 50 61 72 | 61 6d 56 61 6c 75 65 20 | && (Par|amValue |
|00001360| 21 3d 20 22 75 6e 64 65 | 66 69 6e 65 64 22 29 29 |!= "unde|fined"))|
|00001370| 0d 0a 7b 0d 0a 09 50 61 | 72 61 6d 56 61 6c 75 65 |..{...Pa|ramValue|
|00001380| 20 3d 20 53 51 4c 45 73 | 63 61 70 65 51 75 6f 74 | = SQLEs|capeQuot|
|00001390| 65 73 28 50 61 72 61 6d | 56 61 6c 75 65 29 0d 0a |es(Param|Value)..|
|000013a0| 20 50 61 72 61 6d 56 61 | 6c 75 65 20 3d 20 45 6e | ParamVa|lue = En|
|000013b0| 63 6c 6f 73 69 6e 67 54 | 6f 6b 65 6e 20 2b 20 50 |closingT|oken + P|
|000013c0| 61 72 61 6d 56 61 6c 75 | 65 20 2b 20 45 6e 63 6c |aramValu|e + Encl|
|000013d0| 6f 73 69 6e 67 54 6f 6b | 65 6e 3b 0d 0a 09 5b 74 |osingTok|en;...[t|
|000013e0| 61 72 67 65 74 5d 2e 53 | 65 74 50 61 72 61 6d 65 |arget].S|etParame|
|000013f0| 74 65 72 28 5b 53 51 4c | 20 50 61 72 61 6d 65 74 |ter([SQL| Paramet|
|00001400| 65 72 5d 2c 20 50 61 72 | 61 6d 56 61 6c 75 65 29 |er], Par|amValue)|
|00001410| 3b 0d 0a 7d 01 00 00 00 | ff 75 01 50 61 72 61 6d |;..}....|.u.Param|
|00001420| 56 61 6c 75 65 20 3d 20 | 43 53 74 72 28 52 65 71 |Value = |CStr(Req|
|00001430| 75 65 73 74 28 22 5b 4c | 69 73 74 49 74 65 6d 5d |uest("[L|istItem]|
|00001440| 22 29 29 0d 0a 45 6e 63 | 6c 6f 73 69 6e 67 54 6f |"))..Enc|losingTo|
|00001450| 6b 65 6e 20 3d 20 5b 45 | 6e 63 6c 6f 73 69 6e 67 |ken = [E|nclosing|
|00001460| 20 54 6f 6b 65 6e 5d 0d | 0a 69 66 20 45 6e 63 6c | Token].|.if Encl|
|00001470| 6f 73 69 6e 67 54 6f 6b | 65 6e 20 3d 20 22 4e 6f |osingTok|en = "No|
|00001480| 6e 65 22 20 74 68 65 6e | 0d 0a 20 20 45 6e 63 6c |ne" then|.. Encl|
|00001490| 6f 73 69 6e 67 54 6f 6b | 65 6e 20 3d 20 22 22 0d |osingTok|en = "".|
|000014a0| 0a 65 6e 64 20 69 66 0d | 0a 0d 0a 69 66 20 28 28 |.end if.|...if ((|
|000014b0| 50 61 72 61 6d 56 61 6c | 75 65 20 3c 3e 20 22 22 |ParamVal|ue <> ""|
|000014c0| 29 20 41 4e 44 20 28 50 | 61 72 61 6d 56 61 6c 75 |) AND (P|aramValu|
|000014d0| 65 20 3c 3e 20 22 75 6e | 64 65 66 69 6e 65 64 22 |e <> "un|defined"|
|000014e0| 29 29 20 74 68 65 6e 0d | 0a 09 50 61 72 61 6d 56 |)) then.|..ParamV|
|000014f0| 61 6c 75 65 20 3d 20 53 | 51 4c 45 73 63 61 70 65 |alue = S|QLEscape|
|00001500| 51 75 6f 74 65 73 28 50 | 61 72 61 6d 56 61 6c 75 |Quotes(P|aramValu|
|00001510| 65 29 0d 0a 20 50 61 72 | 61 6d 56 61 6c 75 65 20 |e).. Par|amValue |
|00001520| 3d 20 45 6e 63 6c 6f 73 | 69 6e 67 54 6f 6b 65 6e |= Enclos|ingToken|
|00001530| 20 26 20 50 61 72 61 6d | 56 61 6c 75 65 20 26 20 | & Param|Value & |
|00001540| 45 6e 63 6c 6f 73 69 6e | 67 54 6f 6b 65 6e 0d 0a |Enclosin|gToken..|
|00001550| 09 43 61 6c 6c 20 5b 74 | 61 72 67 65 74 5d 2e 53 |.Call [t|arget].S|
|00001560| 65 74 50 61 72 61 6d 65 | 74 65 72 28 5b 53 51 4c |etParame|ter([SQL|
|00001570| 20 50 61 72 61 6d 65 74 | 65 72 5d 2c 20 50 61 72 | Paramet|er], Par|
|00001580| 61 6d 56 61 6c 75 65 29 | 0d 0a 65 6e 64 20 69 66 |amValue)|..end if|
|00001590| 06 80 01 00 00 00 08 4c | 69 73 74 49 74 65 6d 01 |.......L|istItem.|
|000015a0| 00 08 80 03 00 00 00 01 | 00 00 00 11 67 65 74 53 |........|....getS|
|000015b0| 65 6c 65 63 74 65 64 54 | 65 78 74 28 29 00 00 02 |electedT|ext()...|
|000015c0| 00 0f 80 05 00 00 00 0d | 53 51 4c 20 50 61 72 61 |........|SQL Para|
|000015d0| 6d 65 74 65 72 04 00 00 | 00 08 00 00 00 00 00 00 |meter...|........|
|000015e0| 00 00 00 00 00 06 74 61 | 72 67 65 74 01 00 00 00 |......ta|rget....|
|000015f0| 0f 80 05 00 00 00 0f 45 | 6e 63 6c 6f 73 69 6e 67 |.......E|nclosing|
|00001600| 20 54 6f 6b 65 6e 04 00 | 00 00 08 00 02 00 00 00 | Token..|........|
|00001610| 27 00 03 00 01 27 01 23 | 04 4e 6f 6e 65 00 00 00 |'....'.#|.None...|
|00001620| 00 00 00 00 00 00 0e 53 | 51 4c 20 50 61 72 61 6d |.......S|QL Param|
|00001630| 65 74 65 72 73 01 00 68 | d7 56 38 52 90 d2 11 85 |eters..h|.V8R....|
|00001640| ef 00 60 08 ce 58 2b 00 | 00 00 00 04 00 00 00 01 |..`..X+.|........|
|00001650| 00 00 00 00 00 f2 92 c3 | 43 9e 8f d2 11 85 ec 00 |........|C.......|
|00001660| 60 08 ce 58 2b 01 00 00 | 00 24 33 37 37 41 43 34 |`..X+...|.$377AC4|
|00001670| 33 30 2d 36 32 31 31 2d | 31 31 44 32 2d 38 31 31 |30-6211-|11D2-811|
|00001680| 37 2d 30 30 36 30 30 38 | 43 38 36 43 32 35 03 33 |7-006008|C86C25.3|
|00001690| 2e 30 ff 63 04 44 65 73 | 63 72 69 70 74 69 6f 6e |.0.c.Des|cription|
|000016a0| 3a 0d 0a 54 68 69 73 20 | 63 6f 6e 74 72 61 63 74 |:..This |contract|
|000016b0| 20 73 65 74 73 20 74 68 | 65 20 76 61 6c 75 65 20 | sets th|e value |
|000016c0| 6f 66 20 61 20 70 61 72 | 61 6d 65 74 65 72 20 69 |of a par|ameter i|
|000016d0| 6e 20 61 20 70 61 72 61 | 6d 65 74 65 72 69 7a 65 |n a para|meterize|
|000016e0| 64 20 53 51 4c 20 73 74 | 61 74 65 6d 65 6e 74 20 |d SQL st|atement |
|000016f0| 74 6f 20 74 68 65 20 63 | 6f 6e 74 65 6e 74 73 20 |to the c|ontents |
|00001700| 6f 66 20 61 6e 20 6c 69 | 73 74 20 62 6f 78 2e 20 |of an li|st box. |
|00001710| 20 4e 6f 74 65 20 74 68 | 61 74 20 69 74 20 69 73 | Note th|at it is|
|00001720| 20 74 68 65 20 27 76 61 | 6c 75 65 27 20 61 74 74 | the 'va|lue' att|
|00001730| 72 69 62 75 74 65 20 6f | 66 20 74 68 65 20 6c 69 |ribute o|f the li|
|00001740| 73 74 20 65 6c 65 6d 65 | 6e 74 20 69 73 20 70 61 |st eleme|nt is pa|
|00001750| 73 73 65 64 20 69 6e 74 | 6f 20 74 68 65 20 53 51 |ssed int|o the SQ|
|00001760| 4c 20 70 61 72 61 6d 65 | 74 65 72 2e 20 20 20 57 |L parame|ter. W|
|00001770| 68 65 6e 20 79 6f 75 20 | 61 70 70 6c 79 20 74 68 |hen you |apply th|
|00001780| 65 20 69 6e 74 65 72 61 | 63 74 69 6f 6e 2c 20 79 |e intera|ction, y|
|00001790| 6f 75 20 63 61 6e 20 73 | 65 6c 65 63 74 20 74 68 |ou can s|elect th|
|000017a0| 65 20 53 51 4c 20 70 61 | 72 61 6d 65 74 65 72 20 |e SQL pa|rameter |
|000017b0| 74 6f 20 62 65 20 73 65 | 74 20 69 6e 20 74 68 65 |to be se|t in the|
|000017c0| 20 75 6e 64 65 72 6c 79 | 69 6e 67 20 71 75 65 72 | underly|ing quer|
|000017d0| 79 20 61 73 20 77 65 6c | 6c 20 61 73 20 74 68 65 |y as wel|l as the|
|000017e0| 20 65 6e 63 6c 6f 73 69 | 6e 67 20 74 6f 6b 65 6e | enclosi|ng token|
|000017f0| 73 20 62 61 73 65 64 20 | 6f 6e 20 74 68 65 20 64 |s based |on the d|
|00001800| 61 74 61 20 74 79 70 65 | 20 72 65 71 75 69 72 65 |ata type| require|
|00001810| 6d 65 6e 74 73 20 6f 66 | 20 79 6f 75 72 20 64 61 |ments of| your da|
|00001820| 74 61 62 61 73 65 2e 0d | 0a 0d 0a 59 6f 75 20 73 |tabase..|...You s|
|00001830| 68 6f 75 6c 64 20 6f 6e | 6c 79 20 75 73 65 20 74 |hould on|ly use t|
|00001840| 68 69 73 20 63 6f 6e 74 | 72 61 63 74 20 77 68 65 |his cont|ract whe|
|00001850| 6e 20 79 6f 75 20 61 72 | 65 20 77 6f 72 6b 69 6e |n you ar|e workin|
|00001860| 67 20 77 69 74 68 20 61 | 20 70 61 72 61 6d 65 74 |g with a| paramet|
|00001870| 65 72 69 7a 65 64 20 53 | 51 4c 20 53 74 61 74 65 |erized S|QL State|
|00001880| 6d 65 6e 74 2e 20 20 49 | 66 20 79 6f 75 20 74 72 |ment. I|f you tr|
|00001890| 79 20 74 6f 20 75 73 65 | 20 69 74 20 6f 6e 20 61 |y to use| it on a|
|000018a0| 20 52 65 63 6f 72 64 73 | 65 74 20 77 69 74 68 6f | Records|et witho|
|000018b0| 75 74 20 70 61 72 61 6d | 65 74 65 72 73 2c 20 74 |ut param|eters, t|
|000018c0| 68 65 20 53 51 4c 20 50 | 61 72 61 6d 65 74 65 72 |he SQL P|arameter|
|000018d0| 20 64 72 6f 70 20 64 6f | 77 6e 20 77 69 6c 6c 20 | drop do|wn will |
|000018e0| 62 65 20 65 6d 70 74 79 | 2e 0d 0a 0d 0a 50 61 72 |be empty|.....Par|
|000018f0| 61 6d 65 74 65 72 73 3a | 0d 0a 5b 53 51 4c 20 50 |ameters:|..[SQL P|
|00001900| 61 72 61 6d 65 74 65 72 | 5d 20 2d 20 70 61 72 61 |arameter|] - para|
|00001910| 6d 65 74 65 72 20 79 6f | 75 20 77 6f 75 6c 64 20 |meter yo|u would |
|00001920| 6c 69 6b 65 20 74 6f 20 | 63 68 61 6e 67 65 20 0d |like to |change .|
|00001930| 0a 5b 45 6e 63 6c 6f 73 | 69 6e 67 20 54 6f 6b 65 |.[Enclos|ing Toke|
|00001940| 6e 5d 20 2d 20 53 65 74 | 73 20 74 68 65 20 64 65 |n] - Set|s the de|
|00001950| 6c 69 6d 69 74 65 72 20 | 74 6f 6b 65 6e 20 66 6f |limiter |token fo|
|00001960| 72 20 74 68 65 20 70 61 | 72 61 6d 65 74 65 72 27 |r the pa|rameter'|
|00001970| 73 20 76 61 6c 75 65 2e | 20 20 59 6f 75 20 73 68 |s value.| You sh|
|00001980| 6f 75 6c 64 20 6b 6e 6f | 77 20 74 68 65 20 64 65 |ould kno|w the de|
|00001990| 6c 69 6d 69 74 65 72 20 | 72 65 71 75 69 72 65 6d |limiter |requirem|
|000019a0| 65 6e 74 73 20 69 6e 20 | 79 6f 75 72 20 64 61 74 |ents in |your dat|
|000019b0| 61 62 61 73 65 20 66 6f | 72 20 74 68 65 20 65 78 |abase fo|r the ex|
|000019c0| 70 65 63 74 65 64 20 64 | 61 74 61 20 74 79 70 65 |pected d|ata type|
|000019d0| 20 6f 66 20 74 68 65 20 | 70 61 72 61 6d 65 74 65 | of the |paramete|
|000019e0| 72 2e 0d 0a 0d 0a 54 79 | 70 69 63 61 6c 20 50 61 |r.....Ty|pical Pa|
|000019f0| 72 74 69 63 69 70 61 6e | 74 73 3a 0d 0a 5b 4c 69 |rticipan|ts:..[Li|
|00001a00| 73 74 49 74 65 6d 5d 20 | 2d 20 6c 69 73 74 20 62 |stItem] |- list b|
|00001a10| 6f 78 2c 20 64 72 6f 70 | 2d 64 6f 77 6e 20 6c 69 |ox, drop|-down li|
|00001a20| 73 74 0d 0a 5b 54 61 72 | 67 65 74 5d 20 2d 20 72 |st..[Tar|get] - r|
|00001a30| 65 63 6f 72 64 73 65 74 | 20 6f 72 20 63 6f 6d 6d |ecordset| or comm|
|00001a40| 61 6e 64 20 6f 62 6a 65 | 63 74 0d 0a 0d 0a 46 6f |and obje|ct....Fo|
|00001a50| 72 20 6d 6f 72 65 20 69 | 6e 66 6f 72 6d 61 74 69 |r more i|nformati|
|00001a60| 6f 6e 20 6f 6e 20 63 6f | 6e 74 72 61 63 74 73 20 |on on co|ntracts |
|00001a70| 6f 66 20 74 68 69 73 20 | 63 61 74 65 67 6f 72 79 |of this |category|
|00001a80| 2c 20 70 6c 65 61 73 65 | 20 72 65 66 65 72 20 74 |, please| refer t|
|00001a90| 6f 0d 0a 53 51 4c 50 61 | 72 61 6d 65 74 65 72 73 |o..SQLPa|rameters|
|00001aa0| 2e 64 6f 63 0d 0a 54 68 | 69 73 20 66 69 6c 65 20 |.doc..Th|is file |
|00001ab0| 69 73 20 61 76 61 69 6c | 61 62 6c 65 20 69 6e 20 |is avail|able in |
|00001ac0| 74 68 65 20 43 6f 6e 74 | 72 61 63 74 73 20 66 6f |the Cont|racts fo|
|00001ad0| 6c 64 65 72 20 69 6e 20 | 74 68 65 20 44 72 75 6d |lder in |the Drum|
|00001ae0| 62 65 61 74 20 64 69 72 | 65 63 74 6f 72 79 2e 0d |beat dir|ectory..|
|00001af0| 0a 56 31 30 5f 33 30 2e | 04 80 12 00 00 00 30 50 |.V10_30.|......0P|
|00001b00| 61 73 73 20 5b 43 68 65 | 63 6b 42 6f 78 5d 20 74 |ass [Che|ckBox] t|
|00001b10| 6f 20 5b 74 61 72 67 65 | 74 5d 20 75 73 69 6e 67 |o [targe|t] using|
|00001b20| 20 5b 53 51 4c 50 61 72 | 61 6d 65 74 65 72 5d 00 | [SQLPar|ameter].|
|00001b30| 00 00 00 00 02 00 06 80 | 01 00 00 00 06 74 61 72 |........|.....tar|
|00001b40| 67 65 74 02 00 08 80 03 | 00 00 00 01 00 00 00 18 |get.....|........|
|00001b50| 53 65 74 50 61 72 61 6d | 65 74 65 72 28 6e 61 6d |SetParam|eter(nam|
|00001b60| 65 2c 76 61 6c 75 65 29 | 08 80 03 00 00 00 00 00 |e,value)|........|
|00001b70| 00 00 0c 42 65 66 6f 72 | 65 4f 70 65 6e 28 29 01 |...Befor|eOpen().|
|00001b80| 00 0d 80 04 00 00 00 0c | 42 65 66 6f 72 65 4f 70 |........|BeforeOp|
|00001b90| 65 6e 28 29 02 00 00 00 | 00 00 00 00 b0 43 68 65 |en()....|.....Che|
|00001ba0| 63 6b 65 64 20 3d 20 28 | 53 74 72 69 6e 67 28 52 |cked = (|String(R|
|00001bb0| 65 71 75 65 73 74 28 22 | 5b 43 68 65 63 6b 42 6f |equest("|[CheckBo|
|00001bc0| 78 5d 22 29 29 20 21 3d | 20 22 75 6e 64 65 66 69 |x]")) !=| "undefi|
|00001bd0| 6e 65 64 22 29 0d 0a 0d | 0a 69 66 20 28 43 68 65 |ned")...|.if (Che|
|00001be0| 63 6b 65 64 29 0d 0a 7b | 0d 0a 09 50 61 72 61 6d |cked)..{|...Param|
|00001bf0| 56 61 6c 75 65 20 3d 20 | 31 0d 0a 7d 0d 0a 65 6c |Value = |1..}..el|
|00001c00| 73 65 0d 0a 7b 0d 0a 09 | 50 61 72 61 6d 56 61 6c |se..{...|ParamVal|
|00001c10| 75 65 20 3d 20 30 0d 0a | 7d 0d 0a 5b 74 61 72 67 |ue = 0..|}..[targ|
|00001c20| 65 74 5d 2e 53 65 74 50 | 61 72 61 6d 65 74 65 72 |et].SetP|arameter|
|00001c30| 28 5b 53 51 4c 20 50 61 | 72 61 6d 65 74 65 72 5d |([SQL Pa|rameter]|
|00001c40| 2c 20 50 61 72 61 6d 56 | 61 6c 75 65 29 01 00 00 |, ParamV|alue)...|
|00001c50| 00 ab 43 68 65 63 6b 65 | 64 20 3d 20 4e 6f 74 20 |..Checke|d = Not |
|00001c60| 49 73 45 6d 70 74 79 28 | 52 65 71 75 65 73 74 28 |IsEmpty(|Request(|
|00001c70| 22 5b 43 68 65 63 6b 42 | 6f 78 5d 22 29 29 0d 0a |"[CheckB|ox]"))..|
|00001c80| 0d 0a 69 66 20 43 68 65 | 63 6b 65 64 20 3d 20 22 |..if Che|cked = "|
|00001c90| 54 72 75 65 22 20 74 68 | 65 6e 0d 0a 20 50 61 72 |True" th|en.. Par|
|00001ca0| 61 6d 56 61 6c 75 65 20 | 3d 20 31 0d 0a 65 6c 73 |amValue |= 1..els|
|00001cb0| 65 0d 0a 09 50 61 72 61 | 6d 56 61 6c 75 65 20 3d |e...Para|mValue =|
|00001cc0| 20 30 0d 0a 65 6e 64 20 | 69 66 0d 0a 5b 74 61 72 | 0..end |if..[tar|
|00001cd0| 67 65 74 5d 2e 53 65 74 | 50 61 72 61 6d 65 74 65 |get].Set|Paramete|
|00001ce0| 72 20 5b 53 51 4c 20 50 | 61 72 61 6d 65 74 65 72 |r [SQL P|arameter|
|00001cf0| 5d 2c 20 50 61 72 61 6d | 56 61 6c 75 65 06 80 01 |], Param|Value...|
|00001d00| 00 00 00 08 43 68 65 63 | 6b 42 6f 78 01 00 08 80 |....Chec|kBox....|
|00001d10| 03 00 00 00 01 00 00 00 | 08 74 6f 67 67 6c 65 28 |........|.toggle(|
|00001d20| 29 00 00 01 00 0f 80 05 | 00 00 00 0d 53 51 4c 20 |).......|....SQL |
|00001d30| 50 61 72 61 6d 65 74 65 | 72 04 00 00 00 08 00 00 |Paramete|r.......|
|00001d40| 00 00 00 00 00 00 00 00 | 00 06 74 61 72 67 65 74 |........|..target|
|00001d50| 01 00 00 00 0e 53 51 4c | 20 50 61 72 61 6d 65 74 |.....SQL| Paramet|
|00001d60| 65 72 73 00 00 00 00 00 | 00 04 00 00 00 01 00 00 |ers.....|........|
|00001d70| 00 00 00 ec a1 4c dd c0 | 8f d2 11 85 ec 00 60 08 |.....L..|......`.|
|00001d80| ce 58 2b 01 00 00 00 24 | 33 37 37 41 43 34 33 30 |.X+....$|377AC430|
|00001d90| 2d 36 32 31 31 2d 31 31 | 44 32 2d 38 31 31 37 2d |-6211-11|D2-8117-|
|00001da0| 30 30 36 30 30 38 43 38 | 36 43 32 35 03 33 2e 30 |006008C8|6C25.3.0|
|00001db0| ff 1c 03 44 65 73 63 72 | 69 70 74 69 6f 6e 3a 0d |...Descr|iption:.|
|00001dc0| 0a 54 68 69 73 20 63 6f | 6e 74 72 61 63 74 20 73 |.This co|ntract s|
|00001dd0| 65 74 73 20 74 68 65 20 | 76 61 6c 75 65 20 6f 66 |ets the |value of|
|00001de0| 20 61 20 70 61 72 61 6d | 65 74 65 72 20 69 6e 20 | a param|eter in |
|00001df0| 61 20 70 61 72 61 6d 65 | 74 65 72 69 7a 65 64 20 |a parame|terized |
|00001e00| 53 51 4c 20 73 74 61 74 | 65 6d 65 6e 74 20 74 6f |SQL stat|ement to|
|00001e10| 20 74 68 65 20 63 6f 6e | 74 65 6e 74 73 20 6f 66 | the con|tents of|
|00001e20| 20 61 6e 20 63 68 65 63 | 6b 20 62 6f 78 2e 20 20 | an chec|k box. |
|00001e30| 54 68 65 20 73 65 72 76 | 65 72 2d 73 69 64 65 20 |The serv|er-side |
|00001e40| 6e 61 74 75 72 65 20 6f | 66 20 74 68 65 20 63 6f |nature o|f the co|
|00001e50| 6e 74 72 61 63 74 20 6c | 69 6d 69 74 73 20 74 68 |ntract l|imits th|
|00001e60| 65 20 63 68 65 63 6b 20 | 62 6f 78 20 63 6f 6e 74 |e check |box cont|
|00001e70| 65 6e 74 73 20 74 6f 20 | 76 61 6c 75 65 73 20 6f |ents to |values o|
|00001e80| 66 20 54 72 75 65 20 61 | 6e 64 20 46 61 6c 73 65 |f True a|nd False|
|00001e90| 2c 20 72 65 70 72 65 73 | 65 6e 74 65 64 20 61 73 |, repres|ented as|
|00001ea0| 20 74 68 65 20 6e 75 6d | 62 65 72 73 20 31 20 61 | the num|bers 1 a|
|00001eb0| 6e 64 20 30 20 72 65 73 | 70 65 63 74 69 76 65 6c |nd 0 res|pectivel|
|00001ec0| 79 2e 0d 0a 0d 0a 59 6f | 75 20 73 68 6f 75 6c 64 |y.....Yo|u should|
|00001ed0| 20 6f 6e 6c 79 20 75 73 | 65 20 74 68 69 73 20 63 | only us|e this c|
|00001ee0| 6f 6e 74 72 61 63 74 20 | 77 68 65 6e 20 79 6f 75 |ontract |when you|
|00001ef0| 20 61 72 65 20 77 6f 72 | 6b 69 6e 67 20 77 69 74 | are wor|king wit|
|00001f00| 68 20 61 20 70 61 72 61 | 6d 65 74 65 72 69 7a 65 |h a para|meterize|
|00001f10| 64 20 53 51 4c 20 53 74 | 61 74 65 6d 65 6e 74 2e |d SQL St|atement.|
|00001f20| 20 20 49 66 20 79 6f 75 | 20 74 72 79 20 74 6f 20 | If you| try to |
|00001f30| 75 73 65 20 69 74 20 6f | 6e 20 61 20 52 65 63 6f |use it o|n a Reco|
|00001f40| 72 64 73 65 74 20 77 69 | 74 68 6f 75 74 20 70 61 |rdset wi|thout pa|
|00001f50| 72 61 6d 65 74 65 72 73 | 2c 20 74 68 65 20 53 51 |rameters|, the SQ|
|00001f60| 4c 20 50 61 72 61 6d 65 | 74 65 72 20 64 72 6f 70 |L Parame|ter drop|
|00001f70| 20 64 6f 77 6e 20 77 69 | 6c 6c 20 62 65 20 65 6d | down wi|ll be em|
|00001f80| 70 74 79 2e 0d 0a 0d 0a | 50 61 72 61 6d 65 74 65 |pty.....|Paramete|
|00001f90| 72 73 3a 0d 0a 5b 53 51 | 4c 20 50 61 72 61 6d 65 |rs:..[SQ|L Parame|
|00001fa0| 74 65 72 5d 20 2d 20 70 | 61 72 61 6d 65 74 65 72 |ter] - p|arameter|
|00001fb0| 20 79 6f 75 20 77 6f 75 | 6c 64 20 6c 69 6b 65 20 | you wou|ld like |
|00001fc0| 74 6f 20 63 68 61 6e 67 | 65 20 0d 0a 0d 0a 54 79 |to chang|e ....Ty|
|00001fd0| 70 69 63 61 6c 20 50 61 | 72 74 69 63 69 70 61 6e |pical Pa|rticipan|
|00001fe0| 74 73 3a 0d 0a 5b 53 6f | 75 72 63 65 5d 20 2d 20 |ts:..[So|urce] - |
|00001ff0| 63 68 65 63 6b 20 62 6f | 78 0d 0a 5b 54 61 72 67 |check bo|x..[Targ|
|00002000| 65 74 5d 20 2d 20 72 65 | 63 6f 72 64 73 65 74 20 |et] - re|cordset |
|00002010| 6f 72 20 63 6f 6d 6d 61 | 6e 64 20 6f 62 6a 65 63 |or comma|nd objec|
|00002020| 74 0d 0a 0d 0a 46 6f 72 | 20 6d 6f 72 65 20 69 6e |t....For| more in|
|00002030| 66 6f 72 6d 61 74 69 6f | 6e 20 6f 6e 20 63 6f 6e |formatio|n on con|
|00002040| 74 72 61 63 74 73 20 6f | 66 20 74 68 69 73 20 63 |tracts o|f this c|
|00002050| 61 74 65 67 6f 72 79 2c | 20 70 6c 65 61 73 65 20 |ategory,| please |
|00002060| 72 65 66 65 72 20 74 6f | 0d 0a 53 51 4c 50 61 72 |refer to|..SQLPar|
|00002070| 61 6d 65 74 65 72 73 2e | 64 6f 63 0d 0a 54 68 69 |ameters.|doc..Thi|
|00002080| 73 20 66 69 6c 65 20 69 | 73 20 61 76 61 69 6c 61 |s file i|s availa|
|00002090| 62 6c 65 20 69 6e 20 74 | 68 65 20 43 6f 6e 74 72 |ble in t|he Contr|
|000020a0| 61 63 74 73 20 66 6f 6c | 64 65 72 20 69 6e 20 74 |acts fol|der in t|
|000020b0| 68 65 20 44 72 75 6d 62 | 65 61 74 20 64 69 72 65 |he Drumb|eat dire|
|000020c0| 63 74 6f 72 79 2e 0d 0a | 56 31 30 5f 33 30 2e 04 |ctory...|V10_30..|
|000020d0| 80 12 00 00 00 33 50 61 | 73 73 20 5b 52 61 64 69 |.....3Pa|ss [Radi|
|000020e0| 6f 42 75 74 74 6f 6e 5d | 20 74 6f 20 5b 74 61 72 |oButton]| to [tar|
|000020f0| 67 65 74 5d 20 75 73 69 | 6e 67 20 5b 53 51 4c 50 |get] usi|ng [SQLP|
|00002100| 61 72 61 6d 65 74 65 72 | 5d 00 00 00 00 00 02 00 |arameter|].......|
|00002110| 06 80 01 00 00 00 06 74 | 61 72 67 65 74 02 00 08 |.......t|arget...|
|00002120| 80 03 00 00 00 01 00 00 | 00 18 53 65 74 50 61 72 |........|..SetPar|
|00002130| 61 6d 65 74 65 72 28 6e | 61 6d 65 2c 76 61 6c 75 |ameter(n|ame,valu|
|00002140| 65 29 08 80 03 00 00 00 | 00 00 00 00 0c 42 65 66 |e)......|.....Bef|
|00002150| 6f 72 65 4f 70 65 6e 28 | 29 01 00 0d 80 04 00 00 |oreOpen(|).......|
|00002160| 00 0c 42 65 66 6f 72 65 | 4f 70 65 6e 28 29 02 00 |..Before|Open()..|
|00002170| 00 00 00 00 00 00 ff 74 | 01 76 61 72 20 50 61 72 |.......t|.var Par|
|00002180| 61 6d 56 61 6c 75 65 20 | 3d 20 53 74 72 69 6e 67 |amValue |= String|
|00002190| 28 52 65 71 75 65 73 74 | 28 5b 47 72 6f 75 70 4e |(Request|([GroupN|
|000021a0| 61 6d 65 5d 29 29 0d 0a | 76 61 72 20 45 6e 63 6c |ame]))..|var Encl|
|000021b0| 6f 73 69 6e 67 54 6f 6b | 65 6e 20 3d 20 5b 45 6e |osingTok|en = [En|
|000021c0| 63 6c 6f 73 69 6e 67 20 | 54 6f 6b 65 6e 5d 0d 0a |closing |Token]..|
|000021d0| 0d 0a 69 66 20 28 45 6e | 63 6c 6f 73 69 6e 67 54 |..if (En|closingT|
|000021e0| 6f 6b 65 6e 20 3d 3d 22 | 4e 6f 6e 65 22 29 0d 0a |oken =="|None")..|
|000021f0| 20 20 45 6e 63 6c 6f 73 | 69 6e 67 54 6f 6b 65 6e | Enclos|ingToken|
|00002200| 20 3d 20 22 22 0d 0a 0d | 0a 69 66 20 28 28 50 61 | = ""...|.if ((Pa|
|00002210| 72 61 6d 56 61 6c 75 65 | 20 21 3d 20 22 22 29 20 |ramValue| != "") |
|00002220| 26 26 20 28 50 61 72 61 | 6d 56 61 6c 75 65 20 21 |&& (Para|mValue !|
|00002230| 3d 20 22 75 6e 64 65 66 | 69 6e 65 64 22 29 29 0d |= "undef|ined")).|
|00002240| 0a 7b 0d 0a 09 20 20 20 | 20 50 61 72 61 6d 56 61 |.{... | ParamVa|
|00002250| 6c 75 65 20 3d 20 53 51 | 4c 45 73 63 61 70 65 51 |lue = SQ|LEscapeQ|
|00002260| 75 6f 74 65 73 28 50 61 | 72 61 6d 56 61 6c 75 65 |uotes(Pa|ramValue|
|00002270| 29 0d 0a 20 20 20 20 20 | 50 61 72 61 6d 56 61 6c |).. |ParamVal|
|00002280| 75 65 20 3d 20 45 6e 63 | 6c 6f 73 69 6e 67 54 6f |ue = Enc|losingTo|
|00002290| 6b 65 6e 20 2b 20 50 61 | 72 61 6d 56 61 6c 75 65 |ken + Pa|ramValue|
|000022a0| 20 2b 20 45 6e 63 6c 6f | 73 69 6e 67 54 6f 6b 65 | + Enclo|singToke|
|000022b0| 6e 0d 0a 09 20 20 20 20 | 5b 74 61 72 67 65 74 5d |n... |[target]|
|000022c0| 2e 53 65 74 50 61 72 61 | 6d 65 74 65 72 28 5b 53 |.SetPara|meter([S|
|000022d0| 51 4c 20 50 61 72 61 6d | 65 74 65 72 5d 2c 20 50 |QL Param|eter], P|
|000022e0| 61 72 61 6d 56 61 6c 75 | 65 29 0d 0a 7d 01 00 00 |aramValu|e)..}...|
|000022f0| 00 ff 7a 01 50 61 72 61 | 6d 56 61 6c 75 65 20 3d |..z.Para|mValue =|
|00002300| 20 43 73 74 72 28 52 65 | 71 75 65 73 74 28 5b 47 | Cstr(Re|quest([G|
|00002310| 72 6f 75 70 4e 61 6d 65 | 5d 29 29 0d 0a 45 6e 63 |roupName|]))..Enc|
|00002320| 6c 6f 73 69 6e 67 54 6f | 6b 65 6e 20 3d 20 5b 45 |losingTo|ken = [E|
|00002330| 6e 63 6c 6f 73 69 6e 67 | 20 54 6f 6b 65 6e 5d 0d |nclosing| Token].|
|00002340| 0a 69 66 20 45 6e 63 6c | 6f 73 69 6e 67 54 6f 6b |.if Encl|osingTok|
|00002350| 65 6e 20 3d 20 22 4e 6f | 6e 65 22 20 74 68 65 6e |en = "No|ne" then|
|00002360| 0d 0a 20 20 45 6e 63 6c | 6f 73 69 6e 67 54 6f 6b |.. Encl|osingTok|
|00002370| 65 6e 20 3d 20 22 22 0d | 0a 65 6e 64 20 69 66 0d |en = "".|.end if.|
|00002380| 0a 0d 0a 69 66 20 28 28 | 50 61 72 61 6d 56 61 6c |...if ((|ParamVal|
|00002390| 75 65 20 3c 3e 20 22 22 | 29 20 41 6e 64 20 28 50 |ue <> ""|) And (P|
|000023a0| 61 72 61 6d 56 61 6c 75 | 65 20 3c 3e 20 22 75 6e |aramValu|e <> "un|
|000023b0| 64 65 66 69 6e 65 64 22 | 29 29 20 74 68 65 6e 0d |defined"|)) then.|
|000023c0| 0a 09 20 20 20 20 50 61 | 72 61 6d 56 61 6c 75 65 |.. Pa|ramValue|
|000023d0| 20 3d 20 53 51 4c 45 73 | 63 61 70 65 51 75 6f 74 | = SQLEs|capeQuot|
|000023e0| 65 73 28 50 61 72 61 6d | 56 61 6c 75 65 29 0d 0a |es(Param|Value)..|
|000023f0| 20 20 20 20 20 50 61 72 | 61 6d 56 61 6c 75 65 20 | Par|amValue |
|00002400| 3d 20 45 6e 63 6c 6f 73 | 69 6e 67 54 6f 6b 65 6e |= Enclos|ingToken|
|00002410| 20 26 20 50 61 72 61 6d | 56 61 6c 75 65 20 26 20 | & Param|Value & |
|00002420| 45 6e 63 6c 6f 73 69 6e | 67 54 6f 6b 65 6e 0d 0a |Enclosin|gToken..|
|00002430| 09 20 20 20 20 5b 74 61 | 72 67 65 74 5d 2e 53 65 |. [ta|rget].Se|
|00002440| 74 50 61 72 61 6d 65 74 | 65 72 20 5b 53 51 4c 20 |tParamet|er [SQL |
|00002450| 50 61 72 61 6d 65 74 65 | 72 5d 2c 20 50 61 72 61 |Paramete|r], Para|
|00002460| 6d 56 61 6c 75 65 0d 0a | 65 6e 64 20 69 66 06 80 |mValue..|end if..|
|00002470| 01 00 00 00 0b 52 61 64 | 69 6f 42 75 74 74 6f 6e |.....Rad|ioButton|
|00002480| 02 00 08 80 03 00 00 00 | 01 00 00 00 08 73 65 6c |........|.....sel|
|00002490| 65 63 74 28 29 08 80 03 | 00 00 00 01 00 00 00 0a |ect()...|........|
|000024a0| 67 65 74 53 74 61 74 65 | 28 29 00 00 03 00 0f 80 |getState|()......|
|000024b0| 05 00 00 00 0d 53 51 4c | 20 50 61 72 61 6d 65 74 |.....SQL| Paramet|
|000024c0| 65 72 04 00 00 00 08 00 | 00 00 00 00 00 00 00 00 |er......|........|
|000024d0| 00 00 06 74 61 72 67 65 | 74 01 00 00 00 0f 80 05 |...targe|t.......|
|000024e0| 00 00 00 0f 45 6e 63 6c | 6f 73 69 6e 67 20 54 6f |....Encl|osing To|
|000024f0| 6b 65 6e 04 00 00 00 08 | 00 02 00 00 00 27 00 03 |ken.....|.....'..|
|00002500| 00 01 27 01 23 04 4e 6f | 6e 65 00 00 00 00 00 00 |..'.#.No|ne......|
|00002510| 00 00 00 0f 80 05 00 00 | 00 09 47 72 6f 75 70 4e |........|..GroupN|
|00002520| 61 6d 65 00 00 00 00 08 | 00 0c 00 00 00 47 00 72 |ame.....|.....G.r|
|00002530| 00 6f 00 75 00 70 00 31 | 00 00 00 00 00 00 00 00 |.o.u.p.1|........|
|00002540| 00 00 00 00 0e 53 51 4c | 20 50 61 72 61 6d 65 74 |.....SQL| Paramet|
|00002550| 65 72 73 01 00 68 d7 56 | 38 52 90 d2 11 85 ef 00 |ers..h.V|8R......|
|00002560| 60 08 ce 58 2b 00 00 00 | 00 04 00 00 00 01 00 00 |`..X+...|........|
|00002570| 00 00 00 e8 86 de 90 c6 | 8f d2 11 85 ec 00 60 08 |........|......`.|
|00002580| ce 58 2b 01 00 00 00 24 | 33 37 37 41 43 34 33 30 |.X+....$|377AC430|
|00002590| 2d 36 32 31 31 2d 31 31 | 44 32 2d 38 31 31 37 2d |-6211-11|D2-8117-|
|000025a0| 30 30 36 30 30 38 43 38 | 36 43 32 35 03 33 2e 30 |006008C8|6C25.3.0|
|000025b0| ff 08 06 44 65 73 63 72 | 69 70 74 69 6f 6e 3a 0d |...Descr|iption:.|
|000025c0| 0a 54 68 69 73 20 63 6f | 6e 74 72 61 63 74 20 77 |.This co|ntract w|
|000025d0| 69 6c 6c 20 73 65 74 20 | 6f 6e 65 20 6f 66 20 74 |ill set |one of t|
|000025e0| 68 65 20 70 61 72 61 6d | 65 74 65 72 73 20 69 6e |he param|eters in|
|000025f0| 20 61 20 70 61 72 61 6d | 65 74 65 72 69 7a 65 64 | a param|eterized|
|00002600| 20 53 51 4c 20 73 74 61 | 74 65 6d 65 6e 74 20 74 | SQL sta|tement t|
|00002610| 6f 20 74 68 65 20 27 76 | 61 6c 75 65 27 20 61 74 |o the 'v|alue' at|
|00002620| 72 69 62 75 74 65 20 6f | 66 20 74 68 65 20 73 65 |ribute o|f the se|
|00002630| 6c 65 63 74 65 64 20 72 | 61 64 69 6f 20 62 75 74 |lected r|adio but|
|00002640| 74 6f 6e 20 69 6e 20 61 | 20 72 61 64 69 6f 20 62 |ton in a| radio b|
|00002650| 75 74 74 6f 6e 20 67 72 | 6f 75 70 2e 20 20 4e 6f |utton gr|oup. No|
|00002660| 74 65 20 74 68 61 74 20 | 74 68 69 73 20 63 6f 6e |te that |this con|
|00002670| 74 72 61 63 74 20 73 68 | 6f 75 6c 64 20 6f 6e 6c |tract sh|ould onl|
|00002680| 79 20 62 65 20 61 70 70 | 6c 69 65 64 20 74 6f 20 |y be app|lied to |
|00002690| 6f 6e 65 20 6d 65 6d 62 | 65 72 20 6f 66 20 74 68 |one memb|er of th|
|000026a0| 65 20 72 61 64 69 6f 20 | 62 75 74 74 6f 6e 20 67 |e radio |button g|
|000026b0| 72 6f 75 70 2e 20 20 54 | 74 68 65 20 75 6e 64 65 |roup. T|the unde|
|000026c0| 72 6c 79 69 6e 67 20 48 | 54 4d 4c 20 72 65 66 65 |rlying H|TML refe|
|000026d0| 72 65 6e 63 65 73 20 72 | 61 64 69 6f 20 62 75 74 |rences r|adio but|
|000026e0| 74 6f 6e 73 20 61 63 63 | 6f 72 64 69 6e 67 20 74 |tons acc|ording t|
|000026f0| 6f 20 74 68 65 69 72 20 | 67 72 6f 75 70 2c 20 62 |o their |group, b|
|00002700| 75 74 20 44 72 75 6d 62 | 65 61 74 20 64 6f 65 73 |ut Drumb|eat does|
|00002710| 20 6e 6f 74 20 68 61 76 | 65 20 61 20 67 72 6f 75 | not hav|e a grou|
|00002720| 70 20 65 6c 65 6d 65 6e | 74 2e 20 20 53 69 6e 63 |p elemen|t. Sinc|
|00002730| 65 20 74 68 65 20 63 6f | 6e 74 72 61 63 74 20 6e |e the co|ntract n|
|00002740| 65 65 64 73 20 70 61 72 | 74 69 63 70 61 6e 74 20 |eeds par|ticpant |
|00002750| 72 65 71 75 69 72 65 6d | 65 6e 74 73 2c 20 74 68 |requirem|ents, th|
|00002760| 65 20 70 61 72 74 69 63 | 69 70 61 6e 74 20 6d 75 |e partic|ipant mu|
|00002770| 73 74 20 62 65 20 61 20 | 72 61 64 69 6f 20 62 75 |st be a |radio bu|
|00002780| 74 74 6f 6e 2c 20 62 75 | 74 20 61 70 70 6c 79 69 |tton, bu|t applyi|
|00002790| 6e 67 20 74 68 65 20 63 | 6f 6e 74 72 61 63 74 20 |ng the c|ontract |
|000027a0| 74 6f 20 6d 75 6c 74 69 | 70 6c 65 20 72 61 64 69 |to multi|ple radi|
|000027b0| 6f 20 62 75 74 74 6f 6e | 20 6f 66 20 61 20 67 69 |o button| of a gi|
|000027c0| 76 65 6e 20 67 72 6f 75 | 70 20 77 69 6c 6c 20 63 |ven grou|p will c|
|000027d0| 61 75 73 65 20 61 6e 20 | 65 72 72 6f 72 2e 20 20 |ause an |error. |
|000027e0| 20 57 68 65 6e 20 79 6f | 75 20 61 70 70 6c 79 20 | When yo|u apply |
|000027f0| 74 68 65 20 69 6e 74 65 | 72 61 63 74 69 6f 6e 2c |the inte|raction,|
|00002800| 20 79 6f 75 20 63 61 6e | 20 73 65 6c 65 63 74 20 | you can| select |
|00002810| 74 68 65 20 53 51 4c 20 | 70 61 72 61 6d 65 74 65 |the SQL |paramete|
|00002820| 72 20 74 6f 20 62 65 20 | 73 65 74 20 69 6e 20 74 |r to be |set in t|
|00002830| 68 65 20 75 6e 64 65 72 | 6c 79 69 6e 67 20 71 75 |he under|lying qu|
|00002840| 65 72 79 20 61 73 20 77 | 65 6c 6c 20 61 73 20 74 |ery as w|ell as t|
|00002850| 68 65 20 65 6e 63 6c 6f | 73 69 6e 67 20 74 6f 6b |he enclo|sing tok|
|00002860| 65 6e 73 20 62 61 73 65 | 64 20 6f 6e 20 74 68 65 |ens base|d on the|
|00002870| 20 64 61 74 61 20 74 79 | 70 65 20 72 65 71 75 69 | data ty|pe requi|
|00002880| 72 65 6d 65 6e 74 73 20 | 6f 66 20 79 6f 75 72 20 |rements |of your |
|00002890| 64 61 74 61 62 61 73 65 | 2e 0d 0a 0d 0a 59 6f 75 |database|.....You|
|000028a0| 20 73 68 6f 75 6c 64 20 | 6f 6e 6c 79 20 75 73 65 | should |only use|
|000028b0| 20 74 68 69 73 20 63 6f | 6e 74 72 61 63 74 20 77 | this co|ntract w|
|000028c0| 68 65 6e 20 79 6f 75 20 | 61 72 65 20 77 6f 72 6b |hen you |are work|
|000028d0| 69 6e 67 20 77 69 74 68 | 20 61 20 70 61 72 61 6d |ing with| a param|
|000028e0| 65 74 65 72 69 7a 65 64 | 20 53 51 4c 20 53 74 61 |eterized| SQL Sta|
|000028f0| 74 65 6d 65 6e 74 2e 20 | 20 49 66 20 79 6f 75 20 |tement. | If you |
|00002900| 74 72 79 20 74 6f 20 75 | 73 65 20 69 74 20 6f 6e |try to u|se it on|
|00002910| 20 61 20 52 65 63 6f 72 | 64 73 65 74 20 77 69 74 | a Recor|dset wit|
|00002920| 68 6f 75 74 20 70 61 72 | 61 6d 65 74 65 72 73 2c |hout par|ameters,|
|00002930| 20 74 68 65 20 53 51 4c | 20 50 61 72 61 6d 65 74 | the SQL| Paramet|
|00002940| 65 72 20 64 72 6f 70 20 | 64 6f 77 6e 20 77 69 6c |er drop |down wil|
|00002950| 6c 20 62 65 20 65 6d 70 | 74 79 2e 0d 0a 0d 0a 0d |l be emp|ty......|
|00002960| 0a 50 61 72 61 6d 65 74 | 65 72 73 3a 0d 0a 5b 53 |.Paramet|ers:..[S|
|00002970| 51 4c 20 50 61 72 61 6d | 65 74 65 72 73 5d 20 2d |QL Param|eters] -|
|00002980| 20 70 61 72 61 6d 65 74 | 65 72 20 79 6f 75 20 77 | paramet|er you w|
|00002990| 6f 75 6c 64 20 6c 69 6b | 65 20 74 6f 20 63 68 61 |ould lik|e to cha|
|000029a0| 6e 67 65 0d 0a 5b 47 72 | 6f 75 70 20 4e 61 6d 65 |nge..[Gr|oup Name|
|000029b0| 5d 20 2d 20 20 4e 61 6d | 65 20 6f 66 20 74 68 65 |] - Nam|e of the|
|000029c0| 20 67 72 6f 75 70 20 74 | 6f 20 77 68 69 63 68 20 | group t|o which |
|000029d0| 74 68 65 20 70 61 72 74 | 69 63 69 70 61 74 69 6e |the part|icipatin|
|000029e0| 67 20 72 61 64 69 6f 20 | 62 75 74 74 6f 6e 73 20 |g radio |buttons |
|000029f0| 62 65 6c 6f 6e 67 0d 0a | 5b 45 6e 63 6c 6f 73 69 |belong..|[Enclosi|
|00002a00| 6e 67 20 54 6f 6b 65 6e | 5d 20 2d 20 53 65 74 73 |ng Token|] - Sets|
|00002a10| 20 74 68 65 20 64 65 6c | 69 6d 69 74 65 72 20 74 | the del|imiter t|
|00002a20| 6f 6b 65 6e 20 66 6f 72 | 20 74 68 65 20 70 61 72 |oken for| the par|
|00002a30| 61 6d 65 74 65 72 27 73 | 20 76 61 6c 75 65 2e 20 |ameter's| value. |
|00002a40| 20 59 6f 75 20 73 68 6f | 75 6c 64 20 6b 6e 6f 77 | You sho|uld know|
|00002a50| 20 74 68 65 20 64 65 6c | 69 6d 69 74 65 72 20 72 | the del|imiter r|
|00002a60| 65 71 75 69 72 65 6d 65 | 6e 74 73 20 69 6e 20 79 |equireme|nts in y|
|00002a70| 6f 75 72 20 64 61 74 61 | 62 61 73 65 20 66 6f 72 |our data|base for|
|00002a80| 20 74 68 65 20 65 78 70 | 65 63 74 65 64 20 64 61 | the exp|ected da|
|00002a90| 74 61 20 74 79 70 65 20 | 6f 66 20 74 68 65 20 70 |ta type |of the p|
|00002aa0| 61 72 61 6d 65 74 65 72 | 2e 0d 0a 0d 0a 54 79 70 |arameter|.....Typ|
|00002ab0| 69 63 61 6c 20 50 61 72 | 74 69 63 69 70 61 6e 74 |ical Par|ticipant|
|00002ac0| 73 3a 0d 0a 5b 53 6f 75 | 72 63 65 5d 20 2d 20 67 |s:..[Sou|rce] - g|
|00002ad0| 72 6f 75 70 20 6f 66 20 | 72 61 64 69 6f 20 62 75 |roup of |radio bu|
|00002ae0| 74 74 6f 6e 73 0d 0a 5b | 54 61 72 67 65 74 5d 20 |ttons..[|Target] |
|00002af0| 2d 20 72 65 63 6f 72 64 | 73 65 74 20 6f 72 20 63 |- record|set or c|
|00002b00| 6f 6d 6d 61 6e 64 20 6f | 62 6a 65 63 74 0d 0a 0d |ommand o|bject...|
|00002b10| 0a 46 6f 72 20 6d 6f 72 | 65 20 69 6e 66 6f 72 6d |.For mor|e inform|
|00002b20| 61 74 69 6f 6e 20 6f 6e | 20 63 6f 6e 74 72 61 63 |ation on| contrac|
|00002b30| 74 73 20 6f 66 20 74 68 | 69 73 20 63 61 74 65 67 |ts of th|is categ|
|00002b40| 6f 72 79 2c 20 70 6c 65 | 61 73 65 20 72 65 66 65 |ory, ple|ase refe|
|00002b50| 72 20 74 6f 0d 0a 53 51 | 4c 50 61 72 61 6d 65 74 |r to..SQ|LParamet|
|00002b60| 65 72 73 2e 64 6f 63 0d | 0a 54 68 69 73 20 66 69 |ers.doc.|.This fi|
|00002b70| 6c 65 20 69 73 20 61 76 | 61 69 6c 61 62 6c 65 20 |le is av|ailable |
|00002b80| 69 6e 20 74 68 65 20 43 | 6f 6e 74 72 61 63 74 73 |in the C|ontracts|
|00002b90| 20 66 6f 6c 64 65 72 20 | 69 6e 20 74 68 65 20 44 | folder |in the D|
|00002ba0| 72 75 6d 62 65 61 74 20 | 64 69 72 65 63 74 6f 72 |rumbeat |director|
|00002bb0| 79 2e 0d 0a 56 31 30 5f | 33 30 2e 04 80 12 00 00 |y...V10_|30......|
|00002bc0| 00 00 01 00 00 00 1d 53 | 65 74 20 70 61 72 61 6d |.......S|et param|
|00002bd0| 65 74 65 72 20 74 6f 20 | 74 6f 64 61 79 27 73 20 |eter to |today's |
|00002be0| 64 61 74 65 01 00 06 80 | 01 00 00 00 06 73 6f 75 |date....|.....sou|
|00002bf0| 72 63 65 02 00 08 80 03 | 00 00 00 00 00 00 00 0c |rce.....|........|
|00002c00| 42 65 66 6f 72 65 4f 70 | 65 6e 28 29 08 80 03 00 |BeforeOp|en()....|
|00002c10| 00 00 01 00 00 00 18 53 | 65 74 50 61 72 61 6d 65 |.......S|etParame|
|00002c20| 74 65 72 28 6e 61 6d 65 | 2c 76 61 6c 75 65 29 01 |ter(name|,value).|
|00002c30| 00 0d 80 04 00 00 00 0c | 42 65 66 6f 72 65 4f 70 |........|BeforeOp|
|00002c40| 65 6e 28 29 02 00 00 00 | 00 00 00 00 ff 43 01 76 |en()....|.....C.v|
|00002c50| 61 72 20 64 20 3d 20 6e | 65 77 20 44 61 74 65 28 |ar d = n|ew Date(|
|00002c60| 29 0d 0a 76 61 72 20 45 | 6e 63 6c 6f 73 69 6e 67 |)..var E|nclosing|
|00002c70| 54 6f 6b 65 6e 20 3d 20 | 5b 45 6e 63 6c 6f 73 69 |Token = |[Enclosi|
|00002c80| 6e 67 20 54 6f 6b 65 6e | 5d 0d 0a 76 61 72 20 64 |ng Token|]..var d|
|00002c90| 61 74 65 5f 73 74 72 69 | 6e 67 20 3d 20 28 64 2e |ate_stri|ng = (d.|
|00002ca0| 67 65 74 4d 6f 6e 74 68 | 28 29 2b 31 29 20 2b 20 |getMonth|()+1) + |
|00002cb0| 22 2f 22 20 2b 20 64 2e | 67 65 74 44 61 74 65 28 |"/" + d.|getDate(|
|00002cc0| 29 20 2b 20 22 2f 22 20 | 2b 20 64 2e 67 65 74 59 |) + "/" |+ d.getY|
|00002cd0| 65 61 72 28 29 20 2b 20 | 22 20 31 32 3a 30 30 41 |ear() + |" 12:00A|
|00002ce0| 4d 22 0d 0a 0d 0a 69 66 | 20 28 45 6e 63 6c 6f 73 |M"....if| (Enclos|
|00002cf0| 69 6e 67 54 6f 6b 65 6e | 20 3d 3d 20 22 4e 6f 6e |ingToken| == "Non|
|00002d00| 65 22 29 0d 0a 20 20 20 | 20 45 6e 63 6c 6f 73 69 |e").. | Enclosi|
|00002d10| 6e 67 54 6f 6b 65 6e 20 | 3d 20 22 22 0d 0a 0d 0a |ngToken |= ""....|
|00002d20| 64 61 74 65 5f 73 74 72 | 69 6e 67 20 3d 20 45 6e |date_str|ing = En|
|00002d30| 63 6c 6f 73 69 6e 67 54 | 6f 6b 65 6e 20 2b 20 64 |closingT|oken + d|
|00002d40| 61 74 65 5f 73 74 72 69 | 6e 67 20 2b 20 45 6e 63 |ate_stri|ng + Enc|
|00002d50| 6c 6f 73 69 6e 67 54 6f | 6b 65 6e 20 0d 0a 5b 73 |losingTo|ken ..[s|
|00002d60| 6f 75 72 63 65 5d 2e 53 | 65 74 50 61 72 61 6d 65 |ource].S|etParame|
|00002d70| 74 65 72 28 5b 50 61 72 | 61 6d 65 74 65 72 20 4e |ter([Par|ameter N|
|00002d80| 61 6d 65 5d 2c 20 64 61 | 74 65 5f 73 74 72 69 6e |ame], da|te_strin|
|00002d90| 67 29 01 00 00 00 fd 4d | 79 44 61 74 65 20 3d 20 |g).....M|yDate = |
|00002da0| 46 6f 72 6d 61 74 44 61 | 74 65 54 69 6d 65 28 44 |FormatDa|teTime(D|
|00002db0| 61 74 65 2c 20 76 62 53 | 68 6f 72 74 44 61 74 65 |ate, vbS|hortDate|
|00002dc0| 29 0d 0a 45 6e 63 6c 6f | 73 69 6e 67 54 6f 6b 65 |)..Enclo|singToke|
|00002dd0| 6e 20 3d 20 5b 45 6e 63 | 6c 6f 73 69 6e 67 20 54 |n = [Enc|losing T|
|00002de0| 6f 6b 65 6e 5d 0d 0a 0d | 0a 69 66 20 45 6e 63 6c |oken]...|.if Encl|
|00002df0| 6f 73 69 6e 67 54 6f 6b | 65 6e 20 3d 20 22 4e 6f |osingTok|en = "No|
|00002e00| 6e 65 22 20 74 68 65 6e | 0d 0a 20 20 20 20 45 6e |ne" then|.. En|
|00002e10| 63 6c 6f 73 69 6e 67 54 | 6f 6b 65 6e 20 3d 20 22 |closingT|oken = "|
|00002e20| 22 0d 0a 65 6e 64 20 69 | 66 0d 0a 0d 0a 4d 79 44 |"..end i|f....MyD|
|00002e30| 61 74 65 20 3d 20 45 6e | 63 6c 6f 73 69 6e 67 54 |ate = En|closingT|
|00002e40| 6f 6b 65 6e 20 26 20 4d | 79 44 61 74 65 20 26 20 |oken & M|yDate & |
|00002e50| 45 6e 63 6c 6f 73 69 6e | 67 54 6f 6b 65 6e 0d 0a |Enclosin|gToken..|
|00002e60| 43 61 6c 6c 20 5b 73 6f | 75 72 63 65 5d 2e 53 65 |Call [so|urce].Se|
|00002e70| 74 50 61 72 61 6d 65 74 | 65 72 28 5b 50 61 72 61 |tParamet|er([Para|
|00002e80| 6d 65 74 65 72 20 4e 61 | 6d 65 5d 2c 20 4d 79 44 |meter Na|me], MyD|
|00002e90| 61 74 65 29 02 00 0f 80 | 05 00 00 00 0e 50 61 72 |ate)....|.....Par|
|00002ea0| 61 6d 65 74 65 72 20 4e | 61 6d 65 04 00 00 00 08 |ameter N|ame.....|
|00002eb0| 00 00 00 00 00 00 00 00 | 00 00 00 06 73 6f 75 72 |........|....sour|
|00002ec0| 63 65 01 00 00 00 0f 80 | 05 00 00 00 0f 45 6e 63 |ce......|.....Enc|
|00002ed0| 6c 6f 73 69 6e 67 20 54 | 6f 6b 65 6e 04 00 00 00 |losing T|oken....|
|00002ee0| 08 00 02 00 00 00 27 00 | 03 00 01 27 01 23 04 4e |......'.|...'.#.N|
|00002ef0| 6f 6e 65 00 00 00 00 00 | 00 00 00 00 0e 53 51 4c |one.....|.....SQL|
|00002f00| 20 50 61 72 61 6d 65 74 | 65 72 73 00 00 00 00 00 | Paramet|ers.....|
|00002f10| 00 04 00 00 00 01 00 00 | 00 02 00 0d 80 04 00 00 |........|........|
|00002f20| 00 06 6f 6e 4c 6f 61 64 | 01 00 00 00 00 00 00 00 |..onLoad|........|
|00002f30| 00 0d 80 04 00 00 00 06 | 6f 6e 42 6c 75 72 01 00 |........|onBlur..|
|00002f40| 00 00 00 00 00 00 00 6a | 16 16 dd 25 86 d2 11 81 |.......j|...%....|
|00002f50| 66 00 60 08 c8 6a cf 01 | 00 00 00 24 33 37 37 41 |f.`..j..|...$377A|
|00002f60| 43 34 33 30 2d 36 32 31 | 31 2d 31 31 44 32 2d 38 |C430-621|1-11D2-8|
|00002f70| 31 31 37 2d 30 30 36 30 | 30 38 43 38 36 43 32 35 |117-0060|08C86C25|
|00002f80| 03 33 2e 30 ff 46 04 44 | 65 73 63 72 69 70 74 69 |.3.0.F.D|escripti|
|00002f90| 6f 6e 3a 0d 0a 54 68 69 | 73 20 63 6f 6e 74 72 61 |on:..Thi|s contra|
|00002fa0| 63 74 20 77 69 6c 6c 20 | 73 65 74 20 6f 6e 65 20 |ct will |set one |
|00002fb0| 6f 66 20 74 68 65 20 70 | 61 72 61 6d 65 74 65 72 |of the p|arameter|
|00002fc0| 73 20 69 6e 20 61 20 70 | 61 72 61 6d 65 74 65 72 |s in a p|arameter|
|00002fd0| 69 7a 65 64 20 53 51 4c | 20 73 74 61 74 65 6d 65 |ized SQL| stateme|
|00002fe0| 6e 74 20 74 6f 20 74 6f | 64 61 79 27 73 20 64 61 |nt to to|day's da|
|00002ff0| 74 65 2e 20 20 54 6f 20 | 65 6e 76 6f 6b 65 20 74 |te. To |envoke t|
|00003000| 68 69 73 20 63 6f 6e 74 | 72 61 63 74 2c 20 73 65 |his cont|ract, se|
|00003010| 6c 65 63 74 20 61 20 52 | 65 63 6f 72 64 73 65 74 |lect a R|ecordset|
|00003020| 20 6f 72 20 43 6f 6d 6d | 61 6e 64 20 53 6d 61 72 | or Comm|and Smar|
|00003030| 74 45 6c 65 6d 65 6e 74 | 2e 20 20 20 57 68 65 6e |tElement|. When|
|00003040| 20 79 6f 75 20 61 70 70 | 6c 79 20 74 68 65 20 69 | you app|ly the i|
|00003050| 6e 74 65 72 61 63 74 69 | 6f 6e 2c 20 79 6f 75 20 |nteracti|on, you |
|00003060| 63 61 6e 20 73 65 6c 65 | 63 74 20 74 68 65 20 53 |can sele|ct the S|
|00003070| 51 4c 20 70 61 72 61 6d | 65 74 65 72 20 74 6f 20 |QL param|eter to |
|00003080| 62 65 20 73 65 74 20 69 | 6e 20 74 68 65 20 75 6e |be set i|n the un|
|00003090| 64 65 72 6c 79 69 6e 67 | 20 71 75 65 72 79 20 61 |derlying| query a|
|000030a0| 73 20 77 65 6c 6c 20 61 | 73 20 74 68 65 20 65 6e |s well a|s the en|
|000030b0| 63 6c 6f 73 69 6e 67 20 | 74 6f 6b 65 6e 73 20 62 |closing |tokens b|
|000030c0| 61 73 65 64 20 6f 6e 20 | 74 68 65 20 64 61 74 61 |ased on |the data|
|000030d0| 20 74 79 70 65 20 72 65 | 71 75 69 72 65 6d 65 6e | type re|quiremen|
|000030e0| 74 73 20 6f 66 20 79 6f | 75 72 20 64 61 74 61 62 |ts of yo|ur datab|
|000030f0| 61 73 65 2e 0d 0a 0d 0a | 59 6f 75 20 73 68 6f 75 |ase.....|You shou|
|00003100| 6c 64 20 6f 6e 6c 79 20 | 75 73 65 20 74 68 69 73 |ld only |use this|
|00003110| 20 63 6f 6e 74 72 61 63 | 74 20 77 68 65 6e 20 79 | contrac|t when y|
|00003120| 6f 75 20 61 72 65 20 77 | 6f 72 6b 69 6e 67 20 77 |ou are w|orking w|
|00003130| 69 74 68 20 61 20 70 61 | 72 61 6d 65 74 65 72 69 |ith a pa|rameteri|
|00003140| 7a 65 64 20 53 51 4c 20 | 53 74 61 74 65 6d 65 6e |zed SQL |Statemen|
|00003150| 74 2e 20 20 49 66 20 79 | 6f 75 20 74 72 79 20 74 |t. If y|ou try t|
|00003160| 6f 20 75 73 65 20 69 74 | 20 6f 6e 20 61 20 52 65 |o use it| on a Re|
|00003170| 63 6f 72 64 73 65 74 20 | 77 69 74 68 6f 75 74 20 |cordset |without |
|00003180| 70 61 72 61 6d 65 74 65 | 72 73 2c 20 74 68 65 20 |paramete|rs, the |
|00003190| 53 51 4c 20 50 61 72 61 | 6d 65 74 65 72 20 64 72 |SQL Para|meter dr|
|000031a0| 6f 70 20 64 6f 77 6e 20 | 77 69 6c 6c 20 62 65 20 |op down |will be |
|000031b0| 65 6d 70 74 79 2e 0d 0a | 0d 0a 50 61 72 61 6d 65 |empty...|..Parame|
|000031c0| 74 65 72 73 3a 0d 0a 5b | 50 61 72 61 6d 65 74 65 |ters:..[|Paramete|
|000031d0| 72 4e 61 6d 65 5d 20 2d | 20 74 61 72 67 65 74 20 |rName] -| target |
|000031e0| 70 61 72 61 6d 65 74 65 | 72 20 79 6f 75 20 77 6f |paramete|r you wo|
|000031f0| 75 6c 64 20 6c 69 6b 65 | 20 74 6f 20 63 68 61 6e |uld like| to chan|
|00003200| 67 65 20 69 6e 20 74 68 | 65 20 73 6f 75 72 63 65 |ge in th|e source|
|00003210| 27 73 20 75 6e 64 65 72 | 6c 79 69 6e 67 20 64 61 |'s under|lying da|
|00003220| 74 61 20 73 6f 75 72 63 | 65 2e 20 0d 0a 5b 45 6e |ta sourc|e. ..[En|
|00003230| 63 6c 6f 73 69 6e 67 20 | 54 6f 6b 65 6e 5d 20 2d |closing |Token] -|
|00003240| 20 53 65 74 73 20 74 68 | 65 20 64 65 6c 69 6d 69 | Sets th|e delimi|
|00003250| 74 65 72 20 74 6f 6b 65 | 6e 20 66 6f 72 20 74 68 |ter toke|n for th|
|00003260| 65 20 70 61 72 61 6d 65 | 74 65 72 27 73 20 76 61 |e parame|ter's va|
|00003270| 6c 75 65 2e 20 20 59 6f | 75 20 73 68 6f 75 6c 64 |lue. Yo|u should|
|00003280| 20 6b 6e 6f 77 20 74 68 | 65 20 64 65 6c 69 6d 69 | know th|e delimi|
|00003290| 74 65 72 20 72 65 71 75 | 69 72 65 6d 65 6e 74 73 |ter requ|irements|
|000032a0| 20 69 6e 20 79 6f 75 72 | 20 64 61 74 61 62 61 73 | in your| databas|
|000032b0| 65 20 66 6f 72 20 74 68 | 65 20 65 78 70 65 63 74 |e for th|e expect|
|000032c0| 65 64 20 64 61 74 61 20 | 74 79 70 65 20 6f 66 20 |ed data |type of |
|000032d0| 74 68 65 20 70 61 72 61 | 6d 65 74 65 72 2e 0d 0a |the para|meter...|
|000032e0| 0d 0a 54 79 70 69 63 61 | 6c 20 50 61 72 74 69 63 |..Typica|l Partic|
|000032f0| 69 70 61 6e 74 73 3a 0d | 0a 5b 53 6f 75 72 63 65 |ipants:.|.[Source|
|00003300| 5d 20 2d 20 72 65 63 6f | 72 64 73 65 74 20 6f 72 |] - reco|rdset or|
|00003310| 20 63 6f 6d 6d 61 6e 64 | 20 6f 62 6a 65 63 74 0d | command| object.|
|00003320| 0a 0d 0a 46 6f 72 20 6d | 6f 72 65 20 69 6e 66 6f |...For m|ore info|
|00003330| 72 6d 61 74 69 6f 6e 20 | 6f 6e 20 63 6f 6e 74 72 |rmation |on contr|
|00003340| 61 63 74 73 20 6f 66 20 | 74 68 69 73 20 63 61 74 |acts of |this cat|
|00003350| 65 67 6f 72 79 2c 20 70 | 6c 65 61 73 65 20 72 65 |egory, p|lease re|
|00003360| 66 65 72 20 74 6f 0d 0a | 53 51 4c 50 61 72 61 6d |fer to..|SQLParam|
|00003370| 65 74 65 72 73 2e 64 6f | 63 0d 0a 54 68 69 73 20 |eters.do|c..This |
|00003380| 66 69 6c 65 20 69 73 20 | 61 76 61 69 6c 61 62 6c |file is |availabl|
|00003390| 65 20 69 6e 20 74 68 65 | 20 43 6f 6e 74 72 61 63 |e in the| Contrac|
|000033a0| 74 73 20 66 6f 6c 64 65 | 72 20 69 6e 20 74 68 65 |ts folde|r in the|
|000033b0| 20 44 72 75 6d 62 65 61 | 74 20 64 69 72 65 63 74 | Drumbea|t direct|
|000033c0| 6f 72 79 2e 0d 0a 56 31 | 30 5f 33 30 2e 04 80 12 |ory...V1|0_30....|
|000033d0| 00 00 00 3c 53 65 74 20 | 5b 74 61 72 67 65 74 5d |...<Set |[target]|
|000033e0| 20 70 61 72 61 6d 65 74 | 65 72 20 74 6f 20 76 61 | paramet|er to va|
|000033f0| 6c 75 65 20 6f 66 20 5b | 73 6f 75 72 63 65 5d 20 |lue of [|source] |
|00003400| 6f 75 74 70 75 74 20 70 | 61 72 61 6d 65 74 65 72 |output p|arameter|
|00003410| 00 00 00 00 00 02 00 06 | 80 01 00 00 00 06 73 6f |........|......so|
|00003420| 75 72 63 65 03 00 08 80 | 03 00 00 00 00 00 00 00 |urce....|........|
|00003430| 08 53 65 72 76 65 72 28 | 29 08 80 03 00 00 00 00 |.Server(|).......|
|00003440| 00 00 00 0c 42 65 66 6f | 72 65 4f 70 65 6e 28 29 |....Befo|reOpen()|
|00003450| 08 80 03 00 00 00 01 00 | 00 00 18 47 65 74 4f 75 |........|...GetOu|
|00003460| 74 70 75 74 50 61 72 61 | 6d 65 74 65 72 28 6e 61 |tputPara|meter(na|
|00003470| 6d 65 29 00 00 06 80 01 | 00 00 00 06 74 61 72 67 |me).....|....targ|
|00003480| 65 74 02 00 08 80 03 00 | 00 00 00 00 00 00 0c 42 |et......|.......B|
|00003490| 65 66 6f 72 65 4f 70 65 | 6e 28 29 08 80 03 00 00 |eforeOpe|n().....|
|000034a0| 00 01 00 00 00 18 53 65 | 74 50 61 72 61 6d 65 74 |......Se|tParamet|
|000034b0| 65 72 28 6e 61 6d 65 2c | 76 61 6c 75 65 29 01 00 |er(name,|value)..|
|000034c0| 0d 80 04 00 00 00 0c 42 | 65 66 6f 72 65 4f 70 65 |.......B|eforeOpe|
|000034d0| 6e 28 29 02 00 00 00 00 | 00 00 00 56 5b 74 61 72 |n().....|...V[tar|
|000034e0| 67 65 74 5d 2e 53 65 74 | 50 61 72 61 6d 65 74 65 |get].Set|Paramete|
|000034f0| 72 28 5b 49 6e 70 75 74 | 20 50 61 72 61 6d 65 74 |r([Input| Paramet|
|00003500| 65 72 5d 2c 20 5b 73 6f | 75 72 63 65 5d 2e 47 65 |er], [so|urce].Ge|
|00003510| 74 43 6f 6c 75 6d 6e 56 | 61 6c 75 65 28 5b 4f 75 |tColumnV|alue([Ou|
|00003520| 74 70 75 74 20 50 61 72 | 61 6d 65 74 65 72 5d 29 |tput Par|ameter])|
|00003530| 29 3b 01 00 00 00 5a 43 | 61 6c 6c 20 5b 74 61 72 |);....ZC|all [tar|
|00003540| 67 65 74 5d 2e 53 65 74 | 50 61 72 61 6d 65 74 65 |get].Set|Paramete|
|00003550| 72 28 5b 49 6e 70 75 74 | 20 50 61 72 61 6d 65 74 |r([Input| Paramet|
|00003560| 65 72 5d 2c 20 5b 73 6f | 75 72 63 65 5d 2e 47 65 |er], [so|urce].Ge|
|00003570| 74 43 6f 6c 75 6d 6e 56 | 61 6c 75 65 28 5b 4f 75 |tColumnV|alue([Ou|
|00003580| 74 70 75 74 20 50 61 72 | 61 6d 65 74 65 72 5d 29 |tput Par|ameter])|
|00003590| 29 02 00 0f 80 05 00 00 | 00 10 4f 75 74 70 75 74 |).......|..Output|
|000035a0| 20 50 61 72 61 6d 65 74 | 65 72 04 00 00 00 08 00 | Paramet|er......|
|000035b0| 00 00 00 00 00 00 00 00 | 00 00 06 73 6f 75 72 63 |........|...sourc|
|000035c0| 65 01 00 00 00 0f 80 05 | 00 00 00 0f 49 6e 70 75 |e.......|....Inpu|
|000035d0| 74 20 50 61 72 61 6d 65 | 74 65 72 04 00 00 00 08 |t Parame|ter.....|
|000035e0| 00 00 00 00 00 00 00 00 | 00 00 00 06 74 61 72 67 |........|....targ|
|000035f0| 65 74 01 00 00 00 0e 53 | 51 4c 20 50 61 72 61 6d |et.....S|QL Param|
|00003600| 65 74 65 72 73 00 00 00 | 00 00 00 04 00 00 00 01 |eters...|........|
|00003610| 00 00 00 00 00 3f 34 f6 | ca 44 86 d2 11 81 66 00 |.....?4.|.D....f.|
|00003620| 60 08 c8 6a cf 01 00 00 | 00 24 33 37 37 41 43 34 |`..j....|.$377AC4|
|00003630| 33 30 2d 36 32 31 31 2d | 31 31 44 32 2d 38 31 31 |30-6211-|11D2-811|
|00003640| 37 2d 30 30 36 30 30 38 | 43 38 36 43 32 35 03 33 |7-006008|C86C25.3|
|00003650| 2e 30 ff 4c 02 44 65 73 | 63 72 69 70 74 69 6f 6e |.0.L.Des|cription|
|00003660| 3a 0d 0a 54 68 69 73 20 | 63 6f 6e 74 72 61 63 74 |:..This |contract|
|00003670| 20 69 73 20 61 6e 20 69 | 6e 74 65 72 61 63 74 69 | is an i|nteracti|
|00003680| 6f 6e 20 62 65 74 77 65 | 65 6e 20 61 20 63 6f 6d |on betwe|en a com|
|00003690| 6d 61 6e 64 20 6f 62 6a | 65 63 74 20 61 6e 64 20 |mand obj|ect and |
|000036a0| 61 20 72 65 63 6f 72 64 | 73 65 74 2e 20 20 54 68 |a record|set. Th|
|000036b0| 65 20 53 51 4c 20 70 61 | 72 61 6d 65 74 65 72 20 |e SQL pa|rameter |
|000036c0| 6f 66 20 74 68 65 20 72 | 65 63 6f 72 64 73 65 74 |of the r|ecordset|
|000036d0| 27 73 20 71 75 65 72 79 | 20 69 73 20 73 65 74 20 |'s query| is set |
|000036e0| 74 6f 20 74 68 65 20 6f | 75 74 70 75 74 20 70 61 |to the o|utput pa|
|000036f0| 72 61 6d 65 74 65 72 20 | 6f 66 20 74 68 65 20 63 |rameter |of the c|
|00003700| 6f 6d 6d 61 6e 64 27 73 | 20 73 74 6f 72 65 64 20 |ommand's| stored |
|00003710| 70 72 6f 63 65 64 75 72 | 65 0d 0a 0d 0a 50 61 72 |procedur|e....Par|
|00003720| 61 6d 65 74 65 72 73 3a | 0d 0a 5b 49 6e 70 75 74 |ameters:|..[Input|
|00003730| 20 50 61 72 61 6d 65 74 | 65 72 5d 20 2d 20 50 61 | Paramet|er] - Pa|
|00003740| 72 61 6d 65 74 65 72 20 | 6f 66 20 74 68 65 20 72 |rameter |of the r|
|00003750| 65 63 6f 72 64 73 65 74 | 27 73 20 71 75 65 72 79 |ecordset|'s query|
|00003760| 0d 0a 5b 4f 75 74 70 75 | 74 20 50 61 72 61 6d 65 |..[Outpu|t Parame|
|00003770| 74 65 72 5d 20 2d 20 4f | 75 74 70 75 74 20 70 61 |ter] - O|utput pa|
|00003780| 72 61 6d 65 74 65 72 20 | 6f 66 20 74 68 65 20 63 |rameter |of the c|
|00003790| 6f 6d 6d 61 6e 64 27 73 | 20 73 74 6f 72 65 64 20 |ommand's| stored |
|000037a0| 70 72 6f 63 65 64 75 72 | 65 0d 0a 0d 0a 54 79 70 |procedur|e....Typ|
|000037b0| 69 63 61 6c 20 50 61 72 | 74 69 63 69 70 61 6e 74 |ical Par|ticipant|
|000037c0| 73 3a 0d 0a 5b 53 6f 75 | 72 63 65 5d 20 2d 20 43 |s:..[Sou|rce] - C|
|000037d0| 6f 6d 6d 61 6e 64 20 6f | 62 6a 65 63 74 0d 0a 5b |ommand o|bject..[|
|000037e0| 54 61 72 67 65 74 5d 20 | 2d 20 52 65 63 6f 72 64 |Target] |- Record|
|000037f0| 73 65 74 0d 0a 0d 0a 46 | 6f 72 20 6d 6f 72 65 20 |set....F|or more |
|00003800| 69 6e 66 6f 72 6d 61 74 | 69 6f 6e 20 6f 6e 20 63 |informat|ion on c|
|00003810| 6f 6e 74 72 61 63 74 73 | 20 6f 66 20 74 68 69 73 |ontracts| of this|
|00003820| 20 63 61 74 65 67 6f 72 | 79 2c 20 70 6c 65 61 73 | categor|y, pleas|
|00003830| 65 20 72 65 66 65 72 20 | 74 6f 0d 0a 53 51 4c 50 |e refer |to..SQLP|
|00003840| 61 72 61 6d 65 74 65 72 | 73 2e 64 6f 63 0d 0a 54 |arameter|s.doc..T|
|00003850| 68 69 73 20 66 69 6c 65 | 20 69 73 20 61 76 61 69 |his file| is avai|
|00003860| 6c 61 62 6c 65 20 69 6e | 20 74 68 65 20 43 6f 6e |lable in| the Con|
|00003870| 74 72 61 63 74 73 20 66 | 6f 6c 64 65 72 20 69 6e |tracts f|older in|
|00003880| 20 74 68 65 20 44 72 75 | 6d 62 65 61 74 20 64 69 | the Dru|mbeat di|
|00003890| 72 65 63 74 6f 72 79 2e | 0d 0a 56 31 30 5f 33 30 |rectory.|..V10_30|
|000038a0| 2e 04 80 12 00 00 00 33 | 53 65 74 20 53 51 4c 20 |.......3|Set SQL |
|000038b0| 50 61 72 61 6d 65 74 65 | 72 20 69 6e 20 5b 74 61 |Paramete|r in [ta|
|000038c0| 72 67 65 74 5d 20 74 6f | 20 76 61 6c 75 65 20 69 |rget] to| value i|
|000038d0| 6e 20 5b 72 65 71 75 65 | 73 74 5d 01 00 00 00 29 |n [reque|st]....)|
|000038e0| 53 65 74 20 53 51 4c 20 | 50 61 72 61 6d 65 74 65 |Set SQL |Paramete|
|000038f0| 72 20 74 6f 20 52 65 71 | 75 65 73 74 20 4f 62 6a |r to Req|uest Obj|
|00003900| 65 63 74 20 56 61 6c 75 | 65 02 00 06 80 01 00 00 |ect Valu|e.......|
|00003910| 00 06 74 61 72 67 65 74 | 02 00 08 80 03 00 00 00 |..target|........|
|00003920| 01 00 00 00 18 53 65 74 | 50 61 72 61 6d 65 74 65 |.....Set|Paramete|
|00003930| 72 28 6e 61 6d 65 2c 76 | 61 6c 75 65 29 08 80 03 |r(name,v|alue)...|
|00003940| 00 00 00 00 00 00 00 0c | 42 65 66 6f 72 65 4f 70 |........|BeforeOp|
|00003950| 65 6e 28 29 01 00 0d 80 | 04 00 00 00 0c 42 65 66 |en()....|.....Bef|
|00003960| 6f 72 65 4f 70 65 6e 28 | 29 02 00 00 00 00 00 00 |oreOpen(|).......|
|00003970| 00 ff 4c 01 76 61 72 20 | 50 61 72 61 6d 56 61 6c |..L.var |ParamVal|
|00003980| 75 65 20 3d 20 53 74 72 | 69 6e 67 28 5b 72 65 71 |ue = Str|ing([req|
|00003990| 75 65 73 74 5d 28 5b 52 | 65 71 75 65 73 74 20 4f |uest]([R|equest O|
|000039a0| 62 6a 65 63 74 20 4e 61 | 6d 65 5d 29 29 0d 0a 76 |bject Na|me]))..v|
|000039b0| 61 72 20 45 6e 63 6c 6f | 73 69 6e 67 54 6f 6b 65 |ar Enclo|singToke|
|000039c0| 6e 20 3d 20 5b 45 6e 63 | 6c 6f 73 69 6e 67 20 54 |n = [Enc|losing T|
|000039d0| 6f 6b 65 6e 5d 0d 0a 69 | 66 20 28 45 6e 63 6c 6f |oken]..i|f (Enclo|
|000039e0| 73 69 6e 67 54 6f 6b 65 | 6e 20 3d 3d 20 22 4e 6f |singToke|n == "No|
|000039f0| 6e 65 22 29 0d 0a 7b 0d | 0a 09 45 6e 63 6c 6f 73 |ne")..{.|..Enclos|
|00003a00| 69 6e 67 54 6f 6b 65 6e | 20 3d 20 22 22 0d 0a 7d |ingToken| = ""..}|
|00003a10| 0d 0a 0d 0a 69 66 20 28 | 28 50 61 72 61 6d 56 61 |....if (|(ParamVa|
|00003a20| 6c 75 65 20 21 3d 20 22 | 22 29 20 26 26 20 28 50 |lue != "|") && (P|
|00003a30| 61 72 61 6d 56 61 6c 75 | 65 20 21 3d 20 22 75 6e |aramValu|e != "un|
|00003a40| 64 65 66 69 6e 65 64 22 | 29 29 0d 0a 7b 0d 0a 09 |defined"|))..{...|
|00003a50| 50 61 72 61 6d 56 61 6c | 75 65 20 3d 20 45 6e 63 |ParamVal|ue = Enc|
|00003a60| 6c 6f 73 69 6e 67 54 6f | 6b 65 6e 20 2b 20 50 61 |losingTo|ken + Pa|
|00003a70| 72 61 6d 56 61 6c 75 65 | 20 2b 20 45 6e 63 6c 6f |ramValue| + Enclo|
|00003a80| 73 69 6e 67 54 6f 6b 65 | 6e 0d 0a 09 5b 74 61 72 |singToke|n...[tar|
|00003a90| 67 65 74 5d 2e 53 65 74 | 50 61 72 61 6d 65 74 65 |get].Set|Paramete|
|00003aa0| 72 28 5b 53 51 4c 20 50 | 61 72 61 6d 65 74 65 72 |r([SQL P|arameter|
|00003ab0| 5d 2c 50 61 72 61 6d 56 | 61 6c 75 65 29 0d 0a 7d |],ParamV|alue)..}|
|00003ac0| 01 00 00 00 ff 55 01 50 | 61 72 61 6d 56 61 6c 75 |.....U.P|aramValu|
|00003ad0| 65 20 3d 20 43 53 74 72 | 28 5b 72 65 71 75 65 73 |e = CStr|([reques|
|00003ae0| 74 5d 28 5b 52 65 71 75 | 65 73 74 20 4f 62 6a 65 |t]([Requ|est Obje|
|00003af0| 63 74 20 4e 61 6d 65 5d | 29 29 0d 0a 45 6e 63 6c |ct Name]|))..Encl|
|00003b00| 6f 73 69 6e 67 54 6f 6b | 65 6e 20 3d 20 5b 45 6e |osingTok|en = [En|
|00003b10| 63 6c 6f 73 69 6e 67 20 | 54 6f 6b 65 6e 5d 0d 0a |closing |Token]..|
|00003b20| 69 66 20 28 45 6e 63 6c | 6f 73 69 6e 67 54 6f 6b |if (Encl|osingTok|
|00003b30| 65 6e 20 3d 20 22 4e 6f | 6e 65 22 29 20 74 68 65 |en = "No|ne") the|
|00003b40| 6e 0d 0a 09 45 6e 63 6c | 6f 73 69 6e 67 54 6f 6b |n...Encl|osingTok|
|00003b50| 65 6e 20 3d 20 22 22 0d | 0a 65 6e 64 20 69 66 0d |en = "".|.end if.|
|00003b60| 0a 0d 0a 69 66 20 28 28 | 50 61 72 61 6d 56 61 6c |...if ((|ParamVal|
|00003b70| 75 65 20 3c 3e 20 22 22 | 29 20 41 6e 64 20 28 50 |ue <> ""|) And (P|
|00003b80| 61 72 61 6d 56 61 6c 75 | 65 20 3c 3e 20 22 75 6e |aramValu|e <> "un|
|00003b90| 64 65 66 69 6e 65 64 22 | 29 29 20 74 68 65 6e 0d |defined"|)) then.|
|00003ba0| 0a 09 50 61 72 61 6d 56 | 61 6c 75 65 20 3d 20 45 |..ParamV|alue = E|
|00003bb0| 6e 63 6c 6f 73 69 6e 67 | 54 6f 6b 65 6e 20 26 20 |nclosing|Token & |
|00003bc0| 50 61 72 61 6d 56 61 6c | 75 65 20 26 20 45 6e 63 |ParamVal|ue & Enc|
|00003bd0| 6c 6f 73 69 6e 67 54 6f | 6b 65 6e 0d 0a 09 43 61 |losingTo|ken...Ca|
|00003be0| 6c 6c 20 5b 74 61 72 67 | 65 74 5d 2e 53 65 74 50 |ll [targ|et].SetP|
|00003bf0| 61 72 61 6d 65 74 65 72 | 28 5b 53 51 4c 20 50 61 |arameter|([SQL Pa|
|00003c00| 72 61 6d 65 74 65 72 5d | 2c 50 61 72 61 6d 56 61 |rameter]|,ParamVa|
|00003c10| 6c 75 65 29 0d 0a 65 6e | 64 20 69 66 06 80 01 00 |lue)..en|d if....|
|00003c20| 00 00 07 72 65 71 75 65 | 73 74 03 00 08 80 03 00 |...reque|st......|
|00003c30| 00 00 01 00 00 00 06 42 | 6f 64 79 28 29 08 80 03 |.......B|ody()...|
|00003c40| 00 00 00 01 00 00 00 06 | 46 6f 72 6d 28 29 08 80 |........|Form()..|
|00003c50| 03 00 00 00 01 00 00 00 | 0d 51 75 65 72 79 53 74 |........|.QuerySt|
|00003c60| 72 69 6e 67 28 29 00 00 | 03 00 0f 80 05 00 00 00 |ring()..|........|
|00003c70| 0d 53 51 4c 20 50 61 72 | 61 6d 65 74 65 72 04 00 |.SQL Par|ameter..|
|00003c80| 00 00 08 00 00 00 00 00 | 00 00 00 00 00 00 06 74 |........|.......t|
|00003c90| 61 72 67 65 74 01 00 00 | 00 0f 80 05 00 00 00 0f |arget...|........|
|00003ca0| 45 6e 63 6c 6f 73 69 6e | 67 20 54 6f 6b 65 6e 04 |Enclosin|g Token.|
|00003cb0| 00 00 00 08 00 02 00 00 | 00 27 00 03 00 01 27 01 |........|.'....'.|
|00003cc0| 23 04 4e 6f 6e 65 00 00 | 00 00 00 00 00 00 00 0f |#.None..|........|
|00003cd0| 80 05 00 00 00 13 52 65 | 71 75 65 73 74 20 4f 62 |......Re|quest Ob|
|00003ce0| 6a 65 63 74 20 4e 61 6d | 65 00 00 00 00 08 00 0a |ject Nam|e.......|
|00003cf0| 00 00 00 4c 00 69 00 73 | 00 74 00 31 00 00 00 00 |...L.i.s|.t.1....|
|00003d00| 00 00 00 00 00 00 00 00 | 0e 53 51 4c 20 50 61 72 |........|.SQL Par|
|00003d10| 61 6d 65 74 65 72 73 00 | 00 00 00 00 00 04 00 00 |ameters.|........|
|00003d20| 00 01 00 00 00 00 00 ea | c5 f9 f5 25 6d d2 11 81 |........|...%m...|
|00003d30| 2e 00 60 08 c8 6a cf 01 | 00 00 00 24 33 37 37 41 |..`..j..|...$377A|
|00003d40| 43 34 33 30 2d 36 32 31 | 31 2d 31 31 44 32 2d 38 |C430-621|1-11D2-8|
|00003d50| 31 31 37 2d 30 30 36 30 | 30 38 43 38 36 43 32 35 |117-0060|08C86C25|
|00003d60| 03 33 2e 30 ff c5 04 44 | 65 73 63 72 69 70 74 69 |.3.0...D|escripti|
|00003d70| 6f 6e 3a 0d 0a 54 68 69 | 73 20 63 6f 6e 74 72 61 |on:..Thi|s contra|
|00003d80| 63 74 20 77 69 6c 6c 20 | 73 65 74 20 6f 6e 65 20 |ct will |set one |
|00003d90| 6f 66 20 74 68 65 20 70 | 61 72 61 6d 65 74 65 72 |of the p|arameter|
|00003da0| 73 20 69 6e 20 61 20 70 | 61 72 61 6d 65 74 65 72 |s in a p|arameter|
|00003db0| 69 7a 65 64 20 53 51 4c | 20 73 74 61 74 65 6d 65 |ized SQL| stateme|
|00003dc0| 6e 74 20 74 6f 20 61 20 | 76 61 6c 75 65 20 63 6f |nt to a |value co|
|00003dd0| 6e 74 61 69 6e 65 64 20 | 69 6e 20 74 68 65 20 52 |ntained |in the R|
|00003de0| 65 71 75 65 73 74 20 4f | 62 6a 65 63 74 2e 20 20 |equest O|bject. |
|00003df0| 54 6f 20 65 6e 76 6f 6b | 65 20 74 68 69 73 20 63 |To envok|e this c|
|00003e00| 6f 6e 74 72 61 63 74 2c | 20 73 65 6c 65 63 74 20 |ontract,| select |
|00003e10| 61 20 52 65 63 6f 72 64 | 73 65 74 20 6f 72 20 43 |a Record|set or C|
|00003e20| 6f 6d 6d 61 6e 64 20 53 | 6d 61 72 74 45 6c 65 6d |ommand S|martElem|
|00003e30| 65 6e 74 20 61 6e 64 20 | 74 68 65 20 52 65 71 75 |ent and |the Requ|
|00003e40| 65 73 74 20 53 6d 61 72 | 74 45 6c 65 6d 65 6e 74 |est Smar|tElement|
|00003e50| 20 69 6e 20 74 68 65 20 | 62 61 73 65 6d 65 6e 74 | in the |basement|
|00003e60| 2e 20 20 57 68 65 6e 20 | 79 6f 75 20 61 70 70 6c |. When |you appl|
|00003e70| 79 20 74 68 65 20 69 6e | 74 65 72 61 63 74 69 6f |y the in|teractio|
|00003e80| 6e 20 79 6f 75 20 63 61 | 6e 20 73 65 6c 65 63 74 |n you ca|n select|
|00003e90| 20 74 68 65 20 6e 61 6d | 65 20 6f 66 20 74 68 65 | the nam|e of the|
|00003ea0| 20 6f 62 6a 65 63 74 20 | 69 6e 20 74 68 65 20 72 | object |in the r|
|00003eb0| 65 71 75 65 73 74 2c 20 | 74 68 65 20 65 6e 63 6c |equest, |the encl|
|00003ec0| 6f 73 69 6e 67 20 74 6f | 6b 65 6e 73 20 62 61 73 |osing to|kens bas|
|00003ed0| 65 64 20 6f 6e 20 74 68 | 65 20 64 61 74 61 20 74 |ed on th|e data t|
|00003ee0| 79 70 65 20 72 65 71 75 | 69 72 65 6d 65 6e 74 73 |ype requ|irements|
|00003ef0| 20 6f 66 20 79 6f 75 72 | 20 64 61 74 61 62 61 73 | of your| databas|
|00003f00| 65 2c 20 61 6e 64 20 74 | 68 65 20 53 51 4c 20 70 |e, and t|he SQL p|
|00003f10| 61 72 61 6d 65 74 65 72 | 20 74 6f 20 73 65 74 2e |arameter| to set.|
|00003f20| 0d 0a 0d 0a 59 6f 75 20 | 73 68 6f 75 6c 64 20 6f |....You |should o|
|00003f30| 6e 6c 79 20 75 73 65 20 | 74 68 69 73 20 63 6f 6e |nly use |this con|
|00003f40| 74 72 61 63 74 20 77 68 | 65 6e 20 79 6f 75 20 61 |tract wh|en you a|
|00003f50| 72 65 20 77 6f 72 6b 69 | 6e 67 20 77 69 74 68 20 |re worki|ng with |
|00003f60| 61 20 70 61 72 61 6d 65 | 74 65 72 69 7a 65 64 20 |a parame|terized |
|00003f70| 53 51 4c 20 53 74 61 74 | 65 6d 65 6e 74 2e 20 20 |SQL Stat|ement. |
|00003f80| 49 66 20 79 6f 75 20 74 | 72 79 20 74 6f 20 75 73 |If you t|ry to us|
|00003f90| 65 20 69 74 20 6f 6e 20 | 61 20 52 65 63 6f 72 64 |e it on |a Record|
|00003fa0| 73 65 74 20 77 69 74 68 | 6f 75 74 20 70 61 72 61 |set with|out para|
|00003fb0| 6d 65 74 65 72 73 2c 20 | 74 68 65 20 53 51 4c 20 |meters, |the SQL |
|00003fc0| 50 61 72 61 6d 65 74 65 | 72 20 64 72 6f 70 20 64 |Paramete|r drop d|
|00003fd0| 6f 77 6e 20 77 69 6c 6c | 20 62 65 20 65 6d 70 74 |own will| be empt|
|00003fe0| 79 2e 0d 0a 0d 0a 50 61 | 72 61 6d 65 74 65 72 73 |y.....Pa|rameters|
|00003ff0| 3a 0d 0a 5b 53 51 4c 20 | 50 61 72 61 6d 65 74 65 |:..[SQL |Paramete|
|00004000| 72 73 5d 20 2d 20 70 61 | 72 61 6d 65 74 65 72 20 |rs] - pa|rameter |
|00004010| 79 6f 75 20 77 6f 75 6c | 64 20 6c 69 6b 65 20 74 |you woul|d like t|
|00004020| 6f 20 63 68 61 6e 67 65 | 20 0d 0a 5b 52 65 71 75 |o change| ..[Requ|
|00004030| 65 73 74 4f 62 6a 65 63 | 74 4e 61 6d 65 5d 20 2d |estObjec|tName] -|
|00004040| 20 6e 61 6d 65 20 6f 66 | 20 74 68 65 20 20 66 6f | name of| the fo|
|00004050| 72 6d 20 6f 62 6a 65 63 | 74 20 6f 72 20 6f 74 68 |rm objec|t or oth|
|00004060| 65 72 20 72 65 71 75 65 | 73 74 0d 0a 5b 45 6e 63 |er reque|st..[Enc|
|00004070| 6c 6f 73 69 6e 67 20 54 | 6f 6b 65 6e 5d 20 2d 20 |losing T|oken] - |
|00004080| 53 65 74 73 20 74 68 65 | 20 64 65 6c 69 6d 69 74 |Sets the| delimit|
|00004090| 65 72 20 74 6f 6b 65 6e | 20 66 6f 72 20 74 68 65 |er token| for the|
|000040a0| 20 70 61 72 61 6d 65 74 | 65 72 27 73 20 76 61 6c | paramet|er's val|
|000040b0| 75 65 2e 20 20 59 6f 75 | 20 73 68 6f 75 6c 64 20 |ue. You| should |
|000040c0| 6b 6e 6f 77 20 74 68 65 | 20 64 65 6c 69 6d 69 74 |know the| delimit|
|000040d0| 65 72 20 72 65 71 75 69 | 72 65 6d 65 6e 74 73 20 |er requi|rements |
|000040e0| 69 6e 20 79 6f 75 72 20 | 64 61 74 61 62 61 73 65 |in your |database|
|000040f0| 20 66 6f 72 20 74 68 65 | 20 65 78 70 65 63 74 65 | for the| expecte|
|00004100| 64 20 64 61 74 61 20 74 | 79 70 65 20 6f 66 20 74 |d data t|ype of t|
|00004110| 68 65 20 70 61 72 61 6d | 65 74 65 72 2e 0d 0a 0d |he param|eter....|
|00004120| 0a 54 79 70 69 63 61 6c | 20 50 61 72 74 69 63 69 |.Typical| Partici|
|00004130| 70 61 6e 74 73 3a 0d 0a | 5b 72 65 71 75 65 73 74 |pants:..|[request|
|00004140| 5d 20 2d 20 72 65 71 75 | 65 73 74 20 43 4f 4d 20 |] - requ|est COM |
|00004150| 6f 62 6a 65 63 74 0d 0a | 5b 54 61 72 67 65 74 5d |object..|[Target]|
|00004160| 20 2d 20 72 65 63 6f 72 | 64 73 65 74 20 6f 72 20 | - recor|dset or |
|00004170| 63 6f 6d 6d 61 6e 64 20 | 6f 62 6a 65 63 74 0d 0a |command |object..|
|00004180| 0d 0a 46 6f 72 20 6d 6f | 72 65 20 69 6e 66 6f 72 |..For mo|re infor|
|00004190| 6d 61 74 69 6f 6e 20 6f | 6e 20 63 6f 6e 74 72 61 |mation o|n contra|
|000041a0| 63 74 73 20 6f 66 20 74 | 68 69 73 20 63 61 74 65 |cts of t|his cate|
|000041b0| 67 6f 72 79 2c 20 70 6c | 65 61 73 65 20 72 65 66 |gory, pl|ease ref|
|000041c0| 65 72 20 74 6f 0d 0a 53 | 51 4c 50 61 72 61 6d 65 |er to..S|QLParame|
|000041d0| 74 65 72 73 2e 64 6f 63 | 0d 0a 54 68 69 73 20 66 |ters.doc|..This f|
|000041e0| 69 6c 65 20 69 73 20 61 | 76 61 69 6c 61 62 6c 65 |ile is a|vailable|
|000041f0| 20 69 6e 20 74 68 65 20 | 43 6f 6e 74 72 61 63 74 | in the |Contract|
|00004200| 73 20 66 6f 6c 64 65 72 | 20 69 6e 20 74 68 65 20 |s folder| in the |
|00004210| 44 72 75 6d 62 65 61 74 | 20 64 69 72 65 63 74 6f |Drumbeat| directo|
|00004220| 72 79 2e 0d 0a 56 31 30 | 5f 33 30 2e |ry...V10|_30. |
+--------+-------------------------+-------------------------+--------+--------+